; Disassembly of the file "C:\Game Tech\Test Equipment\Fluke\128C901.U19"
;
; Created with dZ80 v1.31
;
; on Thursday, 23 of August 2001 at 10:43 PM
;
0000  ccf418    call    z,#18f4
0003  be        cp      (hl)
0004  3a27f1    ld      a,(#f127)
0007  4f        ld      c,a
0008  21e53d    ld      hl,#3de5
000b  c3edb8    jp      #b8ed
000e  3acdf4    ld      a,(#f4cd)
0011  feff      cp      #ff
0013  2005      jr      nz,#001a        ; (5)
0015  3acef4    ld      a,(#f4ce)
0018  feff      cp      #ff
001a  2809      jr      z,#0025         ; (9)
001c  2acdf4    ld      hl,(#f4cd)
001f  22c7f4    ld      (#f4c7),hl
0022  c3843e    jp      #3e84
0025  cd6f73    call    #736f
0028  c3843e    jp      #3e84
002b  c3843e    jp      #3e84
002e  3ac9f4    ld      a,(#f4c9)
0031  feff      cp      #ff
0033  2005      jr      nz,#003a        ; (5)
0035  3acaf4    ld      a,(#f4ca)
0038  feff      cp      #ff
003a  2809      jr      z,#0045         ; (9)
003c  2ac9f4    ld      hl,(#f4c9)
003f  22c7f4    ld      (#f4c7),hl
0042  c3843e    jp      #3e84
0045  cd6f73    call    #736f
0048  c3843e    jp      #3e84
004b  3a3ef1    ld      a,(#f13e)
004e  fe64      cp      #64
0050  f26b40    jp      p,#406b
0053  2e58      ld      l,#58
0055  cf        rst     #8
0056  dd6ef5    ld      l,(ix-#0b)
0059  d7        rst     #10
005a  2e04      ld      l,#04
005c  cdcda3    call    #a3cd
005f  dd71f8    ld      (ix-#08),c
0062  dd7ef8    ld      a,(ix-#08)
0065  b7        or      a
0066  2009      jr      nz,#0071        ; (9)
0068  c3123f    jp      #3f12
006b  cd6f73    call    #736f
006e  c3843e    jp      #3e84
0071  dd7ef8    ld      a,(ix-#08)
0074  fe02      cp      #02
0076  2006      jr      nz,#007e        ; (6)
0078  cd6f73    call    #736f
007b  c3843e    jp      #3e84
007e  dd7ef7    ld      a,(ix-#09)
0081  fe01      cp      #01
0083  2024      jr      nz,#00a9        ; (36)
0085  21fa3d    ld      hl,#3dfa
0088  ef        rst     #28
0089  213d04    ld      hl,#043d
008c  e5        push    hl
008d  21d53d    ld      hl,#3dd5
0090  e5        push    hl
0091  2e0c      ld      l,#0c
0093  e5        push    hl
0094  2e10      ld      l,#10
0096  e5        push    hl
0097  2143f3    ld      hl,#f343
009a  cd4c78    call    #784c
009d  dd71f8    ld      (ix-#08),c
00a0  dd7ef8    ld      a,(ix-#08)
00a3  b7        or      a
00a4  202f      jr      nz,#00d5        ; (47)
00a6  c3123f    jp      #3f12
00a9  dd7ef7    ld      a,(ix-#09)
00ac  fe03      cp      #03
00ae  203c      jr      nz,#00ec        ; (60)
00b0  21f43d    ld      hl,#3df4
00b3  ef        rst     #28
00b4  21d13d    ld      hl,#3dd1
00b7  e5        push    hl
00b8  214104    ld      hl,#0441
00bb  e5        push    hl
00bc  2e0c      ld      l,#0c
00be  e5        push    hl
00bf  2e10      ld      l,#10
00c1  e5        push    hl
00c2  2143f3    ld      hl,#f343
00c5  cd4c78    call    #784c
00c8  dd71f9    ld      (ix-#07),c
00cb  dd7ef9    ld      a,(ix-#07)
00ce  b7        or      a
00cf  c23f41    jp      nz,#413f
00d2  c3123f    jp      #3f12
00d5  dd7ef8    ld      a,(ix-#08)
00d8  fe02      cp      #02
00da  2006      jr      nz,#00e2        ; (6)
00dc  cd6f73    call    #736f
00df  c3843e    jp      #3e84
00e2  21d1f4    ld      hl,#f4d1
00e5  e5        push    hl
00e6  2143f3    ld      hl,#f343
00e9  e5        push    hl
00ea  df        rst     #18
00eb  f1        pop     af
00ec  3ac7f4    ld      a,(#f4c7)
00ef  feff      cp      #ff
00f1  2005      jr      nz,#00f8        ; (5)
00f3  3ac8f4    ld      a,(#f4c8)
00f6  feff      cp      #ff
00f8  ca9441    jp      z,#4194
00fb  2ac7f4    ld      hl,(#f4c7)
00fe  23        inc     hl
00ff  22c7f4    ld      (#f4c7),hl
0102  e5        push    hl
0103  211200    ld      hl,#0012
0106  e5        push    hl
0107  cd2dba    call    #ba2d
010a  e1        pop     hl
010b  01c0e9    ld      bc,#e9c0
010e  09        add     hl,bc
010f  e5        push    hl
0110  3a3ef1    ld      a,(#f13e)
0113  4f        ld      c,a
0114  87        add     a,a
0115  9f        sbc     a,a
0116  47        ld      b,a
0117  c5        push    bc
0118  211200    ld      hl,#0012
011b  e5        push    hl
011c  cd2dba    call    #ba2d
011f  e1        pop     hl
0120  01aee9    ld      bc,#e9ae
0123  09        add     hl,bc
0124  01ffff    ld      bc,#ffff
0127  09        add     hl,bc
0128  e5        push    hl
0129  2ac7f4    ld      hl,(#f4c7)
012c  e5        push    hl
012d  211200    ld      hl,#0012
0130  e5        push    hl
0131  cd2dba    call    #ba2d
0134  e1        pop     hl
0135  01aee9    ld      bc,#e9ae
0138  09        add     hl,bc
0139  cdd79a    call    #9ad7
013c  c39f41    jp      #419f
013f  dd7ef9    ld      a,(ix-#07)
0142  fe02      cp      #02
0144  2020      jr      nz,#0166        ; (32)
0146  2e78      ld      l,#78
0148  d7        rst     #10
0149  cd66a4    call    #a466
014c  2e00      ld      l,#00
014e  e5        push    hl
014f  2121f1    ld      hl,#f121
0152  e5        push    hl
0153  2139f1    ld      hl,#f139
0156  cdfaac    call    #acfa
0159  dd71f6    ld      (ix-#0a),c
015c  dd7ef6    ld      a,(ix-#0a)
015f  fe02      cp      #02
0161  2012      jr      nz,#0175        ; (18)
0163  c3123f    jp      #3f12
0166  2a45f3    ld      hl,(#f345)
0169  22d1f4    ld      (#f4d1),hl
016c  2a43f3    ld      hl,(#f343)
016f  22d3f4    ld      (#f4d3),hl
0172  c3ec40    jp      #40ec
0175  2e5a      ld      l,#5a
0177  cf        rst     #8
0178  2e04      ld      l,#04
017a  e5        push    hl
017b  2e10      ld      l,#10
017d  e5        push    hl
017e  2143f3    ld      hl,#f343
0181  cdc57f    call    #7fc5
0184  dd7ef6    ld      a,(ix-#0a)
0187  b7        or      a
0188  2004      jr      nz,#018e        ; (4)
018a  0e66      ld      c,#66
018c  1802      jr      #0190           ; (2)
018e  0e69      ld      c,#69
0190  69        ld      l,c
0191  d7        rst     #10
0192  18d2      jr      #0166           ; (-46)
0194  3a3ef1    ld      a,(#f13e)
0197  32c7f4    ld      (#f4c7),a
019a  87        add     a,a
019b  9f        sbc     a,a
019c  32c8f4    ld      (#f4c8),a
019f  3a3ef1    ld      a,(#f13e)
01a2  c601      add     a,#01
01a4  323ef1    ld      (#f13e),a
01a7  2ac7f4    ld      hl,(#f4c7)
01aa  e5        push    hl
01ab  211200    ld      hl,#0012
01ae  e5        push    hl
01af  cd2dba    call    #ba2d
01b2  e1        pop     hl
01b3  01aee9    ld      bc,#e9ae
01b6  09        add     hl,bc
01b7  22cff4    ld      (#f4cf),hl
01ba  e5        push    hl
01bb  2139f1    ld      hl,#f139
01be  e5        push    hl
01bf  df        rst     #18
01c0  f1        pop     af
01c1  2acff4    ld      hl,(#f4cf)
01c4  23        inc     hl
01c5  23        inc     hl
01c6  23        inc     hl
01c7  23        inc     hl
01c8  e5        push    hl
01c9  2121f1    ld      hl,#f121
01cc  e5        push    hl
01cd  df        rst     #18
01ce  f1        pop     af
01cf  2acff4    ld      hl,(#f4cf)
01d2  010800    ld      bc,#0008
01d5  09        add     hl,bc
01d6  dd7ef7    ld      a,(ix-#09)
01d9  77        ld      (hl),a
01da  2acff4    ld      hl,(#f4cf)
01dd  010a00    ld      bc,#000a
01e0  09        add     hl,bc
01e1  97        sub     a
01e2  77        ld      (hl),a
01e3  23        inc     hl
01e4  77        ld      (hl),a
01e5  23        inc     hl
01e6  77        ld      (hl),a
01e7  23        inc     hl
01e8  77        ld      (hl),a
01e9  2acff4    ld      hl,(#f4cf)
01ec  010e00    ld      bc,#000e
01ef  09        add     hl,bc
01f0  e5        push    hl
01f1  21d1f4    ld      hl,#f4d1
01f4  e5        push    hl
01f5  df        rst     #18
01f6  f1        pop     af
01f7  c3843e    jp      #3e84
01fa  3ac7f4    ld      a,(#f4c7)
01fd  feff      cp      #ff
01ff  2005      jr      nz,#0206        ; (5)
0201  3ac8f4    ld      a,(#f4c8)
0204  feff      cp      #ff
0206  282d      jr      z,#0235         ; (45)
0208  2ac7f4    ld      hl,(#f4c7)
020b  cd1bb0    call    #b01b
020e  3acdf4    ld      a,(#f4cd)
0211  feff      cp      #ff
0213  2005      jr      nz,#021a        ; (5)
0215  3acef4    ld      a,(#f4ce)
0218  feff      cp      #ff
021a  281f      jr      z,#023b         ; (31)
021c  3acdf4    ld      a,(#f4cd)
021f  d601      sub     #01
0221  32cdf4    ld      (#f4cd),a
0224  3acef4    ld      a,(#f4ce)
0227  de00      sbc     a,#00
0229  32cef4    ld      (#f4ce),a
022c  2acdf4    ld      hl,(#f4cd)
022f  22c7f4    ld      (#f4c7),hl
0232  c3843e    jp      #3e84
0235  cd6f73    call    #736f
0238  c3843e    jp      #3e84
023b  2ac9f4    ld      hl,(#f4c9)
023e  22c7f4    ld      (#f4c7),hl
0241  c3843e    jp      #3e84
0244  2053      jr      nz,#0299        ; (83)
0246  49        ld      c,c
0247  47        ld      b,a
0248  2000      jr      nz,#024a        ; (0)
024a  2043      jr      nz,#028f        ; (67)
024c  4f        ld      c,a
024d  55        ld      d,l
024e  4e        ld      c,(hl)
024f  54        ld      d,h
0250  2000      jr      nz,#0252        ; (0)
0252  50        ld      d,b
0253  52        ld      d,d
0254  4f        ld      c,a
0255  42        ld      b,d
0256  45        ld      b,l
0257  2d        dec     l
0258  4c        ld      c,h
0259  56        ld      d,(hl)
025a  4c        ld      c,h
025b  2000      jr      nz,#025d        ; (0)
025d  f7        rst     #30
025e  f5        push    af
025f  f5        push    af
0260  f5        push    af
0261  f5        push    af
0262  2e58      ld      l,#58
0264  cf        rst     #8
0265  3a40f1    ld      a,(#f140)
0268  fe02      cp      #02
026a  2009      jr      nz,#0275        ; (9)
026c  2e39      ld      l,#39
026e  d7        rst     #10
026f  cd229a    call    #9a22
0272  c3a343    jp      #43a3
0275  2e30      ld      l,#30
0277  e5        push    hl
0278  2ec1      ld      l,#c1
027a  cd62be    call    #be62
027d  2e19      ld      l,#19
027f  e5        push    hl
0280  2ec0      ld      l,#c0
0282  cd62be    call    #be62
0285  2e34      ld      l,#34
0287  e5        push    hl
0288  2ec1      ld      l,#c1
028a  cd62be    call    #be62
028d  2ec0      ld      l,#c0
028f  cd5cba    call    #ba5c
0292  dd71f8    ld      (ix-#08),c
0295  2e30      ld      l,#30
0297  e5        push    hl
0298  2ec1      ld      l,#c1
029a  cd62be    call    #be62
029d  21f900    ld      hl,#00f9
02a0  e5        push    hl
02a1  2ec0      ld      l,#c0
02a3  cd62be    call    #be62
02a6  2e34      ld      l,#34
02a8  e5        push    hl
02a9  2ec1      ld      l,#c1
02ab  cd62be    call    #be62
02ae  97        sub     a
02af  3260f1    ld      (#f160),a
02b2  3261f1    ld      (#f161),a
02b5  3262f1    ld      (#f162),a
02b8  3263f1    ld      (#f163),a
02bb  3a31f3    ld      a,(#f331)
02be  fe03      cp      #03
02c0  2012      jr      nz,#02d4        ; (18)
02c2  2e40      ld      l,#40
02c4  cd5cba    call    #ba5c
02c7  79        ld      a,c
02c8  3263f1    ld      (#f163),a
02cb  2e60      ld      l,#60
02cd  cd5cba    call    #ba5c
02d0  79        ld      a,c
02d1  3260f1    ld      (#f160),a
02d4  2e00      ld      l,#00
02d6  cd5cba    call    #ba5c
02d9  79        ld      a,c
02da  e67f      and     #7f
02dc  4f        ld      c,a
02dd  dd71f9    ld      (ix-#07),c
02e0  dd7ef9    ld      a,(ix-#07)
02e3  3262f1    ld      (#f162),a
02e6  2e34      ld      l,#34
02e8  e5        push    hl
02e9  2ec3      ld      l,#c3
02eb  cd62be    call    #be62
02ee  3a5ff1    ld      a,(#f15f)
02f1  f610      or      #10
02f3  f608      or      #08
02f5  f601      or      #01
02f7  6f        ld      l,a
02f8  e5        push    hl
02f9  2ec0      ld      l,#c0
02fb  cd62be    call    #be62
02fe  2e3c      ld      l,#3c
0300  e5        push    hl
0301  2ec3      ld      l,#c3
0303  cd62be    call    #be62
0306  2e20      ld      l,#20
0308  cd5cba    call    #ba5c
030b  2e71      ld      l,#71
030d  cf        rst     #8
030e  215242    ld      hl,#4252
0311  ef        rst     #28
0312  97        sub     a
0313  3261f1    ld      (#f161),a
0316  dd6ef8    ld      l,(ix-#08)
0319  cb75      bit     6,l
031b  280e      jr      z,#032b         ; (14)
031d  21cc00    ld      hl,#00cc
0320  d7        rst     #10
0321  3a61f1    ld      a,(#f161)
0324  f604      or      #04
0326  3261f1    ld      (#f161),a
0329  1803      jr      #032e           ; (3)
032b  2e63      ld      l,#63
032d  d7        rst     #10
032e  dd6ef8    ld      l,(ix-#08)
0331  cb6d      bit     5,l
0333  2815      jr      z,#034a         ; (21)
0335  3a31f3    ld      a,(#f331)
0338  fe02      cp      #02
033a  200e      jr      nz,#034a        ; (14)
033c  21d800    ld      hl,#00d8
033f  d7        rst     #10
0340  3a61f1    ld      a,(#f161)
0343  f602      or      #02
0345  3261f1    ld      (#f161),a
0348  1803      jr      #034d           ; (3)
034a  2e63      ld      l,#63
034c  d7        rst     #10
034d  dd6ef8    ld      l,(ix-#08)
0350  7d        ld      a,l
0351  e680      and     #80
0353  6f        ld      l,a
0354  280e      jr      z,#0364         ; (14)
0356  21c800    ld      hl,#00c8
0359  d7        rst     #10
035a  3a61f1    ld      a,(#f161)
035d  f601      or      #01
035f  3261f1    ld      (#f161),a
0362  1803      jr      #0367           ; (3)
0364  2e63      ld      l,#63
0366  d7        rst     #10
0367  214a42    ld      hl,#424a
036a  ef        rst     #28
036b  dd7ef9    ld      a,(ix-#07)
036e  32c7f0    ld      (#f0c7),a
0371  2e03      ld      l,#03
0373  e5        push    hl
0374  2e0a      ld      l,#0a
0376  e5        push    hl
0377  21c5f0    ld      hl,#f0c5
037a  cdc57f    call    #7fc5
037d  214442    ld      hl,#4244
0380  ef        rst     #28
0381  97        sub     a
0382  323bf3    ld      (#f33b),a
0385  323cf3    ld      (#f33c),a
0388  3a63f1    ld      a,(#f163)
038b  323df3    ld      (#f33d),a
038e  3a60f1    ld      a,(#f160)
0391  323ef3    ld      (#f33e),a
0394  2e04      ld      l,#04
0396  e5        push    hl
0397  2e10      ld      l,#10
0399  e5        push    hl
039a  213bf3    ld      hl,#f33b
039d  cdc57f    call    #7fc5
03a0  2e72      ld      l,#72
03a2  cf        rst     #8
03a3  c372be    jp      #be72
03a6  03        inc     bc
03a7  0a        ld      a,(bc)
03a8  0d        dec     c
03a9  0f        rrca    
03aa  51        ld      d,c
03ab  44        ld      b,h
03ac  81        add     a,c
03ad  44        ld      b,h
03ae  7b        ld      a,e
03af  44        ld      b,h
03b0  4d        ld      c,l
03b1  44        ld      b,h
03b2  52        ld      d,d
03b3  45        ld      b,l
03b4  45        ld      b,l
03b5  2d        dec     l
03b6  52        ld      d,d
03b7  55        ld      d,l
03b8  4e        ld      c,(hl)
03b9  00        nop     
03ba  41        ld      b,c
03bb  54        ld      d,h
03bc  41        ld      b,c
03bd  00        nop     
03be  44        ld      b,h
03bf  44        ld      b,h
03c0  52        ld      d,d
03c1  45        ld      b,l
03c2  53        ld      d,e
03c3  53        ld      d,e
03c4  00        nop     
03c5  f7        rst     #30
03c6  21f9ff    ld      hl,#fff9
03c9  39        add     hl,sp
03ca  f9        ld      sp,hl
03cb  2e58      ld      l,#58
03cd  cf        rst     #8
03ce  2e3c      ld      l,#3c
03d0  d7        rst     #10
03d1  2e5b      ld      l,#5b
03d3  cf        rst     #8
03d4  2e03      ld      l,#03
03d6  cd9573    call    #7395
03d9  79        ld      a,c
03da  fe01      cp      #01
03dc  2824      jr      z,#0402         ; (36)
03de  3a27f1    ld      a,(#f127)
03e1  fe1d      cp      #1d
03e3  2023      jr      nz,#0408        ; (35)
03e5  3a40f1    ld      a,(#f140)
03e8  fe02      cp      #02
03ea  201c      jr      nz,#0408        ; (28)
03ec  1814      jr      #0402           ; (20)
03ee  2e5c      ld      l,#5c
03f0  cf        rst     #8
03f1  3a27f1    ld      a,(#f127)
03f4  6f        ld      l,a
03f5  d7        rst     #10
03f6  3a40f1    ld      a,(#f140)
03f9  fe02      cp      #02
03fb  2026      jr      nz,#0423        ; (38)
03fd  cd229a    call    #9a22
0400  1840      jr      #0442           ; (64)
0402  cde6b8    call    #b8e6
0405  c372be    jp      #be72
0408  3a27f1    ld      a,(#f127)
040b  fe1d      cp      #1d
040d  280e      jr      z,#041d         ; (14)
040f  3a27f1    ld      a,(#f127)
0412  fe1c      cp      #1c
0414  20d8      jr      nz,#03ee        ; (-40)
0416  3a40f1    ld      a,(#f140)
0419  fe02      cp      #02
041b  20d1      jr      nz,#03ee        ; (-47)
041d  cd6f73    call    #736f
0420  c3d443    jp      #43d4
0423  3a27f1    ld      a,(#f127)
0426  fe1c      cp      #1c
0428  200e      jr      nz,#0438        ; (14)
042a  dd36f900  ld      (ix-#07),#00
042e  3a5ef1    ld      a,(#f15e)
0431  3227f1    ld      (#f127),a
0434  6f        ld      l,a
0435  d7        rst     #10
0436  180a      jr      #0442           ; (10)
0438  dd36f901  ld      (ix-#07),#01
043c  3a27f1    ld      a,(#f127)
043f  325ef1    ld      (#f15e),a
0442  3a27f1    ld      a,(#f127)
0445  6f        ld      l,a
0446  4d        ld      c,l
0447  21a643    ld      hl,#43a6
044a  c3edb8    jp      #b8ed
044d  21be43    ld      hl,#43be
0450  ef        rst     #28
0451  2e63      ld      l,#63
0453  d7        rst     #10
0454  3a40f1    ld      a,(#f140)
0457  fe02      cp      #02
0459  282c      jr      z,#0487         ; (44)
045b  dd7ef9    ld      a,(ix-#07)
045e  b7        or      a
045f  2826      jr      z,#0487         ; (38)
0461  3a5ef1    ld      a,(#f15e)
0464  fe0f      cp      #0f
0466  2004      jr      nz,#046c        ; (4)
0468  0e02      ld      c,#02
046a  1802      jr      #046e           ; (2)
046c  0e03      ld      c,#03
046e  79        ld      a,c
046f  3231f3    ld      (#f331),a
0472  fe03      cp      #03
0474  2014      jr      nz,#048a        ; (20)
0476  cd1395    call    #9513
0479  180f      jr      #048a           ; (15)
047b  21ba43    ld      hl,#43ba
047e  ef        rst     #28
047f  18d0      jr      #0451           ; (-48)
0481  21b243    ld      hl,#43b2
0484  ef        rst     #28
0485  18ca      jr      #0451           ; (-54)
0487  c372be    jp      #be72
048a  3a31f3    ld      a,(#f331)
048d  6f        ld      l,a
048e  cdab99    call    #99ab
0491  3a31f3    ld      a,(#f331)
0494  6f        ld      l,a
0495  cdab99    call    #99ab
0498  2e20      ld      l,#20
049a  cd5cba    call    #ba5c
049d  2e66      ld      l,#66
049f  d7        rst     #10
04a0  18e5      jr      #0487           ; (-27)
04a2  010014    ld      bc,#1400
04a5  f1        pop     af
04a6  010002    ld      bc,#0200
04a9  00        nop     
04aa  13        inc     de
04ab  f1        pop     af
04ac  010003    ld      bc,#0300
04af  00        nop     
04b0  be        cp      (hl)
04b1  f0        ret     p

04b2  010004    ld      bc,#0400
04b5  00        nop     
04b6  15        dec     d
04b7  f1        pop     af
04b8  010005    ld      bc,#0500
04bb  00        nop     
04bc  c1        pop     bc
04bd  f0        ret     p

04be  04        inc     b
04bf  00        nop     
04c0  0600      ld      b,#00
04c2  e1        pop     hl
04c3  f20400    jp      p,#0004
04c6  07        rlca    
04c7  00        nop     
04c8  28f3      jr      z,#04bd         ; (-13)
04ca  04        inc     b
04cb  00        nop     
04cc  08        ex      af,af'
04cd  00        nop     
04ce  37        scf     
04cf  f3        di      
04d0  04        inc     b
04d1  00        nop     
04d2  09        add     hl,bc
04d3  00        nop     
04d4  35        dec     (hl)
04d5  f1        pop     af
04d6  04        inc     b
04d7  00        nop     
04d8  0a        ld      a,(bc)
04d9  00        nop     
04da  33        inc     sp
04db  f3        di      
04dc  04        inc     b
04dd  00        nop     
04de  0b        dec     bc
04df  00        nop     
04e0  ba        cp      d
04e1  f0        ret     p

04e2  04        inc     b
04e3  00        nop     
04e4  0c        inc     c
04e5  00        nop     
04e6  57        ld      d,a
04e7  f1        pop     af
04e8  07        rlca    
04e9  00        nop     
04ea  0d        dec     c
04eb  00        nop     
04ec  daf001    jp      c,#01f0
04ef  00        nop     
04f0  0e00      ld      c,#00
04f2  dbf0      in      a,(#f0)
04f4  1c        inc     e
04f5  00        nop     
04f6  0f        rrca    
04f7  00        nop     
04f8  f7        rst     #30
04f9  f0        ret     p

04fa  1c        inc     e
04fb  00        nop     
04fc  1000      djnz    #04fe           ; (0)
04fe  00        nop     
04ff  e8        ret     pe

0500  2000      jr      nz,#0502        ; (0)
0502  110020    ld      de,#2000
0505  e8        ret     pe

0506  2000      jr      nz,#0508        ; (0)
0508  12        ld      (de),a
0509  00        nop     
050a  40        ld      b,b
050b  e8        ret     pe

050c  2000      jr      nz,#050e        ; (0)
050e  13        inc     de
050f  00        nop     
0510  60        ld      h,b
0511  e8        ret     pe

0512  2000      jr      nz,#0514        ; (0)
0514  14        inc     d
0515  00        nop     
0516  80        add     a,b
0517  e8        ret     pe

0518  2000      jr      nz,#051a        ; (0)
051a  15        dec     d
051b  00        nop     
051c  a0        and     b
051d  e8        ret     pe

051e  2000      jr      nz,#0520        ; (0)
0520  1600      ld      d,#00
0522  c0        ret     nz

0523  e8        ret     pe

0524  2000      jr      nz,#0526        ; (0)
0526  17        rla     
0527  00        nop     
0528  e0        ret     po

0529  e8        ret     pe

052a  2000      jr      nz,#052c        ; (0)
052c  1800      jr      #052e           ; (0)
052e  d5        push    de
052f  f40200    call    p,#0002
0532  0610      ld      b,#10
0534  3d        dec     a
0535  2a2f1f    ld      hl,(#1f2f)
0538  200f      jr      nz,#0549        ; (15)
053a  46        ld      b,(hl)
053b  09        add     hl,bc
053c  46        ld      b,(hl)
053d  03        inc     bc
053e  46        ld      b,(hl)
053f  fd45      ld      b,iyl
0541  f7        rst     #30
0542  45        ld      b,l
0543  f1        pop     af
0544  45        ld      b,l
0545  eb        ex      de,hl
0546  45        ld      b,l
0547  2d        dec     l
0548  204e      jr      nz,#0598        ; (78)
054a  4f        ld      c,a
054b  54        ld      d,h
054c  2046      jr      nz,#0594        ; (70)
054e  4f        ld      c,a
054f  55        ld      d,l
0550  4e        ld      c,(hl)
0551  44        ld      b,h
0552  00        nop     
0553  4c        ld      c,h
0554  49        ld      c,c
0555  53        ld      d,e
0556  54        ld      d,h
0557  2050      jr      nz,#05a9        ; (80)
0559  52        ld      d,d
055a  4f        ld      c,a
055b  47        ld      b,a
055c  52        ld      d,d
055d  41        ld      b,c
055e  4d        ld      c,l
055f  2000      jr      nz,#0561        ; (0)
0561  41        ld      b,c
0562  55        ld      d,l
0563  58        ld      e,b
0564  202d      jr      nz,#0593        ; (45)
0566  2053      jr      nz,#05bb        ; (83)
0568  45        ld      b,l
0569  4c        ld      c,h
056a  45        ld      b,l
056b  43        ld      b,e
056c  54        ld      d,h
056d  2041      jr      nz,#05b0        ; (65)
056f  43        ld      b,e
0570  54        ld      d,h
0571  49        ld      c,c
0572  4f        ld      c,a
0573  4e        ld      c,(hl)
0574  2000      jr      nz,#0576        ; (0)
0576  41        ld      b,c
0577  55        ld      d,l
0578  58        ld      e,b
0579  2049      jr      nz,#05c4        ; (73)
057b  4e        ld      c,(hl)
057c  54        ld      d,h
057d  45        ld      b,l
057e  52        ld      d,d
057f  46        ld      b,(hl)
0580  41        ld      b,c
0581  43        ld      b,e
0582  45        ld      b,l
0583  204e      jr      nz,#05d3        ; (78)
0585  4f        ld      c,a
0586  54        ld      d,h
0587  2050      jr      nz,#05d9        ; (80)
0589  52        ld      d,d
058a  45        ld      b,l
058b  53        ld      d,e
058c  45        ld      b,l
058d  4e        ld      c,(hl)
058e  54        ld      d,h
058f  00        nop     
0590  f7        rst     #30
0591  3a40f1    ld      a,(#f140)
0594  fe02      cp      #02
0596  2005      jr      nz,#059d        ; (5)
0598  cd4c13    call    #134c
059b  181f      jr      #05bc           ; (31)
059d  3a40f1    ld      a,(#f140)
05a0  fe03      cp      #03
05a2  200b      jr      nz,#05af        ; (11)
05a4  3ab8f0    ld      a,(#f0b8)
05a7  b7        or      a
05a8  2815      jr      z,#05bf         ; (21)
05aa  cd4c13    call    #134c
05ad  180d      jr      #05bc           ; (13)
05af  2e58      ld      l,#58
05b1  cf        rst     #8
05b2  3ab8f0    ld      a,(#f0b8)
05b5  b7        or      a
05b6  2014      jr      nz,#05cc        ; (20)
05b8  217645    ld      hl,#4576
05bb  ef        rst     #28
05bc  c372be    jp      #be72
05bf  2a59f3    ld      hl,(#f359)
05c2  cd0b9c    call    #9c0b
05c5  69        ld      l,c
05c6  60        ld      h,b
05c7  2259f3    ld      (#f359),hl
05ca  18f0      jr      #05bc           ; (-16)
05cc  216145    ld      hl,#4561
05cf  ef        rst     #28
05d0  2ee1      ld      l,#e1
05d2  cd5cba    call    #ba5c
05d5  2e5b      ld      l,#5b
05d7  cf        rst     #8
05d8  2e17      ld      l,#17
05da  cd9573    call    #7395
05dd  2e5c      ld      l,#5c
05df  cf        rst     #8
05e0  3a27f1    ld      a,(#f127)
05e3  6f        ld      l,a
05e4  4d        ld      c,l
05e5  213245    ld      hl,#4532
05e8  c3edb8    jp      #b8ed
05eb  cdff47    call    #47ff
05ee  c372be    jp      #be72
05f1  cd834a    call    #4a83
05f4  c372be    jp      #be72
05f7  cd314c    call    #4c31
05fa  c372be    jp      #be72
05fd  cdc046    call    #46c0
0600  c372be    jp      #be72
0603  cddf4d    call    #4ddf
0606  c372be    jp      #be72
0609  cd0652    call    #5206
060c  c372be    jp      #be72
060f  3a27f1    ld      a,(#f127)
0612  fe0a      cp      #0a
0614  fa1e46    jp      m,#461e
0617  3a27f1    ld      a,(#f127)
061a  fe1c      cp      #1c
061c  2034      jr      nz,#0652        ; (52)
061e  cde6b8    call    #b8e6
0621  3e63      ld      a,#63
0623  32c7f0    ld      (#f0c7),a
0626  2147f3    ld      hl,#f347
0629  e5        push    hl
062a  212cf1    ld      hl,#f12c
062d  e5        push    hl
062e  df        rst     #18
062f  f1        pop     af
0630  2e58      ld      l,#58
0632  cf        rst     #8
0633  215345    ld      hl,#4553
0636  ef        rst     #28
0637  21c5f0    ld      hl,#f0c5
063a  e5        push    hl
063b  214104    ld      hl,#0441
063e  e5        push    hl
063f  2e00      ld      l,#00
0641  e5        push    hl
0642  2e0a      ld      l,#0a
0644  e5        push    hl
0645  2147f3    ld      hl,#f347
0648  cd4c78    call    #784c
064b  79        ld      a,c
064c  b7        or      a
064d  2018      jr      nz,#0667        ; (24)
064f  c372be    jp      #be72
0652  2e00      ld      l,#00
0654  e5        push    hl
0655  3a27f1    ld      a,(#f127)
0658  6f        ld      l,a
0659  cd9c75    call    #759c
065c  79        ld      a,c
065d  fe01      cp      #01
065f  2030      jr      nz,#0691        ; (48)
0661  cde6b8    call    #b8e6
0664  c372be    jp      #be72
0667  3a49f3    ld      a,(#f349)
066a  4f        ld      c,a
066b  87        add     a,a
066c  9f        sbc     a,a
066d  47        ld      b,a
066e  69        ld      l,c
066f  60        ld      h,b
0670  29        add     hl,hl
0671  015ff3    ld      bc,#f35f
0674  09        add     hl,bc
0675  7e        ld      a,(hl)
0676  23        inc     hl
0677  b6        or      (hl)
0678  2810      jr      z,#068a         ; (16)
067a  21ad00    ld      hl,#00ad
067d  d7        rst     #10
067e  3a49f3    ld      a,(#f349)
0681  6f        ld      l,a
0682  cda74c    call    #4ca7
0685  2e4b      ld      l,#4b
0687  d7        rst     #10
0688  1804      jr      #068e           ; (4)
068a  214745    ld      hl,#4547
068d  ef        rst     #28
068e  c372be    jp      #be72
0691  cd6f73    call    #736f
0694  c3d545    jp      #45d5
0697  c3d545    jp      #45d5
069a  2020      jr      nz,#06bc        ; (32)
069c  2000      jr      nz,#069e        ; (0)
069e  50        ld      d,b
069f  52        ld      d,d
06a0  4f        ld      c,a
06a1  47        ld      b,a
06a2  2020      jr      nz,#06c4        ; (32)
06a4  53        ld      d,e
06a5  49        ld      c,c
06a6  5a        ld      e,d
06a7  45        ld      b,l
06a8  00        nop     
06a9  4c        ld      c,h
06aa  49        ld      c,c
06ab  53        ld      d,e
06ac  54        ld      d,h
06ad  2050      jr      nz,#06ff        ; (80)
06af  52        ld      d,d
06b0  4f        ld      c,a
06b1  47        ld      b,a
06b2  52        ld      d,d
06b3  41        ld      b,c
06b4  4d        ld      c,l
06b5  204e      jr      nz,#0705        ; (78)
06b7  55        ld      d,l
06b8  4d        ld      c,l
06b9  42        ld      b,d
06ba  45        ld      b,l
06bb  52        ld      d,d
06bc  53        ld      d,e
06bd  202d      jr      nz,#06ec        ; (45)
06bf  00        nop     
06c0  f7        rst     #30
06c1  21f6ff    ld      hl,#fff6
06c4  39        add     hl,sp
06c5  f9        ld      sp,hl
06c6  2e58      ld      l,#58
06c8  cf        rst     #8
06c9  3a4ff3    ld      a,(#f34f)
06cc  fe00      cp      #00
06ce  2005      jr      nz,#06d5        ; (5)
06d0  3a50f3    ld      a,(#f350)
06d3  fec0      cp      #c0
06d5  2006      jr      nz,#06dd        ; (6)
06d7  2e7a      ld      l,#7a
06d9  d7        rst     #10
06da  c38447    jp      #4784
06dd  21a946    ld      hl,#46a9
06e0  ef        rst     #28
06e1  cde1a5    call    #a5e1
06e4  219e46    ld      hl,#469e
06e7  cd6e54    call    #546e
06ea  cde1a5    call    #a5e1
06ed  cde1a5    call    #a5e1
06f0  dd36f900  ld      (ix-#07),#00
06f4  dd7ef9    ld      a,(ix-#07)
06f7  fe64      cp      #64
06f9  d28147    jp      nc,#4781
06fc  dd4ef9    ld      c,(ix-#07)
06ff  97        sub     a
0700  47        ld      b,a
0701  69        ld      l,c
0702  60        ld      h,b
0703  29        add     hl,hl
0704  015ff3    ld      bc,#f35f
0707  09        add     hl,bc
0708  7e        ld      a,(hl)
0709  dd77f6    ld      (ix-#0a),a
070c  23        inc     hl
070d  7e        ld      a,(hl)
070e  dd77f7    ld      (ix-#09),a
0711  dd7ef6    ld      a,(ix-#0a)
0714  ddb6f7    or      (ix-#09)
0717  ca8747    jp      z,#4787
071a  dd6ef6    ld      l,(ix-#0a)
071d  dd66f7    ld      h,(ix-#09)
0720  7e        ld      a,(hl)
0721  fe51      cp      #51
0723  2004      jr      nz,#0729        ; (4)
0725  0e2a      ld      c,#2a
0727  1802      jr      #072b           ; (2)
0729  0e20      ld      c,#20
072b  69        ld      l,c
072c  cda054    call    #54a0
072f  dd7ef9    ld      a,(ix-#07)
0732  32c7f0    ld      (#f0c7),a
0735  2e02      ld      l,#02
0737  e5        push    hl
0738  2e0a      ld      l,#0a
073a  e5        push    hl
073b  21c5f0    ld      hl,#f0c5
073e  cd31aa    call    #aa31
0741  219a46    ld      hl,#469a
0744  cd6e54    call    #546e
0747  dd6ef9    ld      l,(ix-#07)
074a  cd319b    call    #9b31
074d  79        ld      a,c
074e  dd96f6    sub     (ix-#0a)
0751  4f        ld      c,a
0752  78        ld      a,b
0753  dd9ef7    sbc     a,(ix-#09)
0756  47        ld      b,a
0757  97        sub     a
0758  3247f3    ld      (#f347),a
075b  3248f3    ld      (#f348),a
075e  79        ld      a,c
075f  3249f3    ld      (#f349),a
0762  78        ld      a,b
0763  324af3    ld      (#f34a),a
0766  2e01      ld      l,#01
0768  e5        push    hl
0769  2e0a      ld      l,#0a
076b  e5        push    hl
076c  2147f3    ld      hl,#f347
076f  cd31aa    call    #aa31
0772  cde1a5    call    #a5e1
0775  2e00      ld      l,#00
0777  cd7c76    call    #767c
077a  79        ld      a,c
077b  b7        or      a
077c  2809      jr      z,#0787         ; (9)
077e  c372be    jp      #be72
0781  2e4b      ld      l,#4b
0783  d7        rst     #10
0784  c372be    jp      #be72
0787  dd34f9    inc     (ix-#07)
078a  c3f446    jp      #46f4
078d  a1        and     c
078e  47        ld      b,a
078f  9a        sbc     a,d
0790  47        ld      b,a
0791  93        sub     e
0792  47        ld      b,a
0793  49        ld      c,c
0794  2f        cpl     
0795  4f        ld      c,a
0796  2040      jr      nz,#07d8        ; (64)
0798  2000      jr      nz,#079a        ; (0)
079a  52        ld      d,d
079b  4f        ld      c,a
079c  4d        ld      c,l
079d  2040      jr      nz,#07df        ; (64)
079f  2000      jr      nz,#07a1        ; (0)
07a1  52        ld      d,d
07a2  41        ld      b,c
07a3  4d        ld      c,l
07a4  2040      jr      nz,#07e6        ; (64)
07a6  2000      jr      nz,#07a8        ; (0)
07a8  02        ld      (bc),a
07a9  03        inc     bc
07aa  012042    ld      bc,#4220
07ad  49        ld      c,c
07ae  54        ld      d,h
07af  53        ld      d,e
07b0  2000      jr      nz,#07b2        ; (0)
07b2  2053      jr      nz,#0807        ; (83)
07b4  49        ld      c,c
07b5  47        ld      b,a
07b6  2000      jr      nz,#07b8        ; (0)
07b8  41        ld      b,c
07b9  44        ld      b,h
07ba  44        ld      b,h
07bb  52        ld      d,d
07bc  45        ld      b,l
07bd  53        ld      d,e
07be  53        ld      d,e
07bf  2053      jr      nz,#0814        ; (83)
07c1  50        ld      d,b
07c2  41        ld      b,c
07c3  43        ld      b,e
07c4  45        ld      b,l
07c5  2049      jr      nz,#0810        ; (73)
07c7  4e        ld      c,(hl)
07c8  46        ld      b,(hl)
07c9  4f        ld      c,a
07ca  52        ld      d,d
07cb  4d        ld      c,l
07cc  41        ld      b,c
07cd  54        ld      d,h
07ce  49        ld      c,c
07cf  4f        ld      c,a
07d0  4e        ld      c,(hl)
07d1  00        nop     
07d2  4c        ld      c,h
07d3  49        ld      c,c
07d4  53        ld      d,e
07d5  54        ld      d,h
07d6  2041      jr      nz,#0819        ; (65)
07d8  44        ld      b,h
07d9  44        ld      b,h
07da  52        ld      d,d
07db  2053      jr      nz,#0830        ; (83)
07dd  50        ld      d,b
07de  41        ld      b,c
07df  43        ld      b,e
07e0  45        ld      b,l
07e1  2049      jr      nz,#082c        ; (73)
07e3  4e        ld      c,(hl)
07e4  46        ld      b,(hl)
07e5  4f        ld      c,a
07e6  202d      jr      nz,#0815        ; (45)
07e8  00        nop     
07e9  4e        ld      c,(hl)
07ea  4f        ld      c,a
07eb  2041      jr      nz,#082e        ; (65)
07ed  44        ld      b,h
07ee  44        ld      b,h
07ef  52        ld      d,d
07f0  45        ld      b,l
07f1  53        ld      d,e
07f2  53        ld      d,e
07f3  2053      jr      nz,#0848        ; (83)
07f5  50        ld      d,b
07f6  41        ld      b,c
07f7  43        ld      b,e
07f8  45        ld      b,l
07f9  2049      jr      nz,#0844        ; (73)
07fb  4e        ld      c,(hl)
07fc  46        ld      b,(hl)
07fd  4f        ld      c,a
07fe  00        nop     
07ff  f7        rst     #30
0800  21eeff    ld      hl,#ffee
0803  39        add     hl,sp
0804  f9        ld      sp,hl
0805  2e58      ld      l,#58
0807  cf        rst     #8
0808  3a3ef1    ld      a,(#f13e)
080b  b7        or      a
080c  2007      jr      nz,#0815        ; (7)
080e  21e947    ld      hl,#47e9
0811  ef        rst     #28
0812  c3ce48    jp      #48ce
0815  21d247    ld      hl,#47d2
0818  ef        rst     #28
0819  cde1a5    call    #a5e1
081c  21b847    ld      hl,#47b8
081f  cd6e54    call    #546e
0822  cde1a5    call    #a5e1
0825  cde1a5    call    #a5e1
0828  dd36f800  ld      (ix-#08),#00
082c  dd5ef8    ld      e,(ix-#08)
082f  97        sub     a
0830  57        ld      d,a
0831  7b        ld      a,e
0832  d603      sub     #03
0834  7a        ld      a,d
0835  de00      sbc     a,#00
0837  f2cb48    jp      p,#48cb
083a  21a847    ld      hl,#47a8
083d  dd5ef8    ld      e,(ix-#08)
0840  97        sub     a
0841  57        ld      d,a
0842  19        add     hl,de
0843  7e        ld      a,(hl)
0844  dd77f3    ld      (ix-#0d),a
0847  dd36f900  ld      (ix-#07),#00
084b  dd36f700  ld      (ix-#09),#00
084f  21aee9    ld      hl,#e9ae
0852  dd75f4    ld      (ix-#0c),l
0855  dd74f5    ld      (ix-#0b),h
0858  213ef1    ld      hl,#f13e
085b  dd7ef7    ld      a,(ix-#09)
085e  be        cp      (hl)
085f  d2d748    jp      nc,#48d7
0862  dd6ef4    ld      l,(ix-#0c)
0865  dd66f5    ld      h,(ix-#0b)
0868  010800    ld      bc,#0008
086b  09        add     hl,bc
086c  7e        ld      a,(hl)
086d  ddbef3    cp      (ix-#0d)
0870  c2fc48    jp      nz,#48fc
0873  dd36f901  ld      (ix-#07),#01
0877  dd4ef8    ld      c,(ix-#08)
087a  97        sub     a
087b  47        ld      b,a
087c  69        ld      l,c
087d  60        ld      h,b
087e  29        add     hl,hl
087f  018d47    ld      bc,#478d
0882  09        add     hl,bc
0883  7e        ld      a,(hl)
0884  23        inc     hl
0885  66        ld      h,(hl)
0886  6f        ld      l,a
0887  cd6e54    call    #546e
088a  2e04      ld      l,#04
088c  e5        push    hl
088d  2e10      ld      l,#10
088f  e5        push    hl
0890  dd6ef4    ld      l,(ix-#0c)
0893  dd66f5    ld      h,(ix-#0b)
0896  cd31aa    call    #aa31
0899  dd6ef4    ld      l,(ix-#0c)
089c  dd66f5    ld      h,(ix-#0b)
089f  23        inc     hl
08a0  23        inc     hl
08a1  23        inc     hl
08a2  23        inc     hl
08a3  e5        push    hl
08a4  dd6ef4    ld      l,(ix-#0c)
08a7  dd66f5    ld      h,(ix-#0b)
08aa  e5        push    hl
08ab  cdd9ba    call    #bad9
08ae  ca0849    jp      z,#4908
08b1  2e2d      ld      l,#2d
08b3  cda054    call    #54a0
08b6  2e04      ld      l,#04
08b8  e5        push    hl
08b9  2e10      ld      l,#10
08bb  e5        push    hl
08bc  dd6ef4    ld      l,(ix-#0c)
08bf  dd66f5    ld      h,(ix-#0b)
08c2  23        inc     hl
08c3  23        inc     hl
08c4  23        inc     hl
08c5  23        inc     hl
08c6  cd31aa    call    #aa31
08c9  183d      jr      #0908           ; (61)
08cb  2e4b      ld      l,#4b
08cd  d7        rst     #10
08ce  c372be    jp      #be72
08d1  dd34f8    inc     (ix-#08)
08d4  c32c48    jp      #482c
08d7  dd7ef9    ld      a,(ix-#07)
08da  b7        or      a
08db  28f4      jr      z,#08d1         ; (-12)
08dd  cde1a5    call    #a5e1
08e0  18ef      jr      #08d1           ; (-17)
08e2  dd34f7    inc     (ix-#09)
08e5  dd6ef4    ld      l,(ix-#0c)
08e8  dd66f5    ld      h,(ix-#0b)
08eb  7d        ld      a,l
08ec  c612      add     a,#12
08ee  6f        ld      l,a
08ef  7c        ld      a,h
08f0  ce00      adc     a,#00
08f2  67        ld      h,a
08f3  dd75f4    ld      (ix-#0c),l
08f6  dd74f5    ld      (ix-#0b),h
08f9  c35848    jp      #4858
08fc  2e00      ld      l,#00
08fe  cd7c76    call    #767c
0901  79        ld      a,c
0902  b7        or      a
0903  28dd      jr      z,#08e2         ; (-35)
0905  c372be    jp      #be72
0908  dd7ef3    ld      a,(ix-#0d)
090b  fe03      cp      #03
090d  2030      jr      nz,#093f        ; (48)
090f  21b247    ld      hl,#47b2
0912  cd6e54    call    #546e
0915  dd6ef4    ld      l,(ix-#0c)
0918  dd66f5    ld      h,(ix-#0b)
091b  010e00    ld      bc,#000e
091e  09        add     hl,bc
091f  97        sub     a
0920  dd77ee    ld      (ix-#12),a
0923  dd77ef    ld      (ix-#11),a
0926  7e        ld      a,(hl)
0927  dd77f0    ld      (ix-#10),a
092a  23        inc     hl
092b  7e        ld      a,(hl)
092c  dd77f1    ld      (ix-#0f),a
092f  2e04      ld      l,#04
0931  e5        push    hl
0932  2e10      ld      l,#10
0934  e5        push    hl
0935  dde5      push    ix
0937  c1        pop     bc
0938  21eeff    ld      hl,#ffee
093b  09        add     hl,bc
093c  cd31aa    call    #aa31
093f  dd7ef3    ld      a,(ix-#0d)
0942  fe01      cp      #01
0944  2019      jr      nz,#095f        ; (25)
0946  21ab47    ld      hl,#47ab
0949  cd6e54    call    #546e
094c  2e02      ld      l,#02
094e  e5        push    hl
094f  2e10      ld      l,#10
0951  e5        push    hl
0952  dd6ef4    ld      l,(ix-#0c)
0955  dd66f5    ld      h,(ix-#0b)
0958  010e00    ld      bc,#000e
095b  09        add     hl,bc
095c  cd31aa    call    #aa31
095f  cde1a5    call    #a5e1
0962  c3fc48    jp      #48fc
0965  80        add     a,b
0966  2010      jr      nz,#0978        ; (16)
0968  08        ex      af,af'
0969  04        inc     b
096a  02        ld      (bc),a
096b  01c1f0    ld      bc,#f0c1
096e  e1        pop     hl
096f  f233f3    jp      p,#f333
0972  28f3      jr      z,#0967         ; (-13)
0974  37        scf     
0975  f3        di      
0976  ba        cp      d
0977  f0        ret     p

0978  35        dec     (hl)
0979  f1        pop     af
097a  1010      djnz    #098c           ; (16)
097c  0a        ld      a,(bc)
097d  1010      djnz    #098f           ; (16)
097f  100a      djnz    #098b           ; (10)
0981  04        inc     b
0982  04        inc     b
0983  010202    ld      bc,#0202
0986  08        ex      af,af'
0987  01f049    ld      bc,#49f0
098a  e0        ret     po

098b  49        ld      c,c
098c  cf        rst     #8
098d  49        ld      c,c
098e  bd        cp      l
098f  49        ld      c,c
0990  af        xor     a
0991  49        ld      c,c
0992  a1        and     c
0993  49        ld      c,c
0994  96        sub     (hl)
0995  49        ld      c,c
0996  44        ld      b,h
0997  41        ld      b,c
0998  54        ld      d,h
0999  41        ld      b,c
099a  2045      jr      nz,#09e1        ; (69)
099c  52        ld      d,d
099d  52        ld      d,d
099e  4f        ld      c,a
099f  52        ld      d,d
09a0  00        nop     
09a1  41        ld      b,c
09a2  44        ld      b,h
09a3  44        ld      b,h
09a4  52        ld      d,d
09a5  45        ld      b,l
09a6  53        ld      d,e
09a7  53        ld      d,e
09a8  2045      jr      nz,#09ef        ; (69)
09aa  52        ld      d,d
09ab  52        ld      d,d
09ac  4f        ld      c,a
09ad  52        ld      d,d
09ae  00        nop     
09af  43        ld      b,e
09b0  4f        ld      c,a
09b1  4e        ld      c,(hl)
09b2  54        ld      d,h
09b3  52        ld      d,d
09b4  4f        ld      c,a
09b5  4c        ld      c,h
09b6  2045      jr      nz,#09fd        ; (69)
09b8  52        ld      d,d
09b9  52        ld      d,d
09ba  4f        ld      c,a
09bb  52        ld      d,d
09bc  00        nop     
09bd  41        ld      b,c
09be  43        ld      b,e
09bf  54        ld      d,h
09c0  49        ld      c,c
09c1  56        ld      d,(hl)
09c2  45        ld      b,l
09c3  2046      jr      nz,#0a0b        ; (70)
09c5  4f        ld      c,a
09c6  52        ld      d,d
09c7  43        ld      b,e
09c8  45        ld      b,l
09c9  204c      jr      nz,#0a17        ; (76)
09cb  49        ld      c,c
09cc  4e        ld      c,(hl)
09cd  45        ld      b,l
09ce  00        nop     
09cf  41        ld      b,c
09d0  43        ld      b,e
09d1  54        ld      d,h
09d2  49        ld      c,c
09d3  56        ld      d,(hl)
09d4  45        ld      b,l
09d5  2049      jr      nz,#0a20        ; (73)
09d7  4e        ld      c,(hl)
09d8  54        ld      d,h
09d9  45        ld      b,l
09da  52        ld      d,d
09db  52        ld      d,d
09dc  55        ld      d,l
09dd  50        ld      d,b
09de  54        ld      d,h
09df  00        nop     
09e0  49        ld      c,c
09e1  4c        ld      c,h
09e2  4c        ld      c,h
09e3  45        ld      b,l
09e4  47        ld      b,a
09e5  41        ld      b,c
09e6  4c        ld      c,h
09e7  2041      jr      nz,#0a2a        ; (65)
09e9  44        ld      b,h
09ea  44        ld      b,h
09eb  52        ld      d,d
09ec  45        ld      b,l
09ed  53        ld      d,e
09ee  53        ld      d,e
09ef  00        nop     
09f0  42        ld      b,d
09f1  41        ld      b,c
09f2  44        ld      b,h
09f3  2050      jr      nz,#0a45        ; (80)
09f5  4f        ld      c,a
09f6  57        ld      d,a
09f7  45        ld      b,l
09f8  52        ld      d,d
09f9  2053      jr      nz,#0a4e        ; (83)
09fb  55        ld      d,l
09fc  50        ld      d,b
09fd  50        ld      d,b
09fe  4c        ld      c,h
09ff  59        ld      e,c
0a00  00        nop     
0a01  4e        ld      c,(hl)
0a02  4f        ld      c,a
0a03  00        nop     
0a04  59        ld      e,c
0a05  45        ld      b,l
0a06  53        ld      d,e
0a07  00        nop     
0a08  42        ld      b,d
0a09  45        ld      b,l
0a0a  45        ld      b,l
0a0b  50        ld      d,b
0a0c  204f      jr      nz,#0a5d        ; (79)
0a0e  4e        ld      c,(hl)
0a0f  2045      jr      nz,#0a56        ; (69)
0a11  52        ld      d,d
0a12  52        ld      d,d
0a13  2054      jr      nz,#0a69        ; (84)
0a15  52        ld      d,d
0a16  41        ld      b,c
0a17  4e        ld      c,(hl)
0a18  53        ld      d,e
0a19  49        ld      c,c
0a1a  54        ld      d,h
0a1b  49        ld      c,c
0a1c  4f        ld      c,a
0a1d  4e        ld      c,(hl)
0a1e  2d        dec     l
0a1f  00        nop     
0a20  4e        ld      c,(hl)
0a21  4f        ld      c,a
0a22  00        nop     
0a23  59        ld      e,c
0a24  45        ld      b,l
0a25  53        ld      d,e
0a26  00        nop     
0a27  45        ld      b,l
0a28  58        ld      e,b
0a29  45        ld      b,l
0a2a  52        ld      d,d
0a2b  43        ld      b,e
0a2c  49        ld      c,c
0a2d  53        ld      d,e
0a2e  45        ld      b,l
0a2f  2045      jr      nz,#0a76        ; (69)
0a31  52        ld      d,d
0a32  52        ld      d,d
0a33  4f        ld      c,a
0a34  52        ld      d,d
0a35  53        ld      d,e
0a36  2d        dec     l
0a37  00        nop     
0a38  2d        dec     l
0a39  4e        ld      c,(hl)
0a3a  4f        ld      c,a
0a3b  00        nop     
0a3c  2d        dec     l
0a3d  59        ld      e,c
0a3e  45        ld      b,l
0a3f  53        ld      d,e
0a40  00        nop     
0a41  54        ld      d,h
0a42  52        ld      d,d
0a43  41        ld      b,c
0a44  50        ld      d,b
0a45  2000      jr      nz,#0a47        ; (0)
0a47  2d        dec     l
0a48  4e        ld      c,(hl)
0a49  4f        ld      c,a
0a4a  00        nop     
0a4b  2d        dec     l
0a4c  59        ld      e,c
0a4d  45        ld      b,l
0a4e  53        ld      d,e
0a4f  00        nop     
0a50  45        ld      b,l
0a51  4e        ld      c,(hl)
0a52  41        ld      b,c
0a53  42        ld      b,d
0a54  4c        ld      c,h
0a55  45        ld      b,l
0a56  2000      jr      nz,#0a58        ; (0)
0a58  50        ld      d,b
0a59  4f        ld      c,a
0a5a  44        ld      b,h
0a5b  202d      jr      nz,#0a8a        ; (45)
0a5d  2000      jr      nz,#0a5f        ; (0)
0a5f  53        ld      d,e
0a60  45        ld      b,l
0a61  54        ld      d,h
0a62  55        ld      d,l
0a63  50        ld      d,b
0a64  2049      jr      nz,#0aaf        ; (73)
0a66  4e        ld      c,(hl)
0a67  46        ld      b,(hl)
0a68  4f        ld      c,a
0a69  52        ld      d,d
0a6a  4d        ld      c,l
0a6b  41        ld      b,c
0a6c  54        ld      d,h
0a6d  49        ld      c,c
0a6e  4f        ld      c,a
0a6f  4e        ld      c,(hl)
0a70  00        nop     
0a71  4c        ld      c,h
0a72  49        ld      c,c
0a73  53        ld      d,e
0a74  54        ld      d,h
0a75  2053      jr      nz,#0aca        ; (83)
0a77  45        ld      b,l
0a78  54        ld      d,h
0a79  55        ld      d,l
0a7a  50        ld      d,b
0a7b  2049      jr      nz,#0ac6        ; (73)
0a7d  4e        ld      c,(hl)
0a7e  46        ld      b,(hl)
0a7f  4f        ld      c,a
0a80  202d      jr      nz,#0aaf        ; (45)
0a82  00        nop     
0a83  f7        rst     #30
0a84  f5        push    af
0a85  f5        push    af
0a86  f5        push    af
0a87  f5        push    af
0a88  2e58      ld      l,#58
0a8a  cf        rst     #8
0a8b  21714a    ld      hl,#4a71
0a8e  ef        rst     #28
0a8f  cde1a5    call    #a5e1
0a92  215f4a    ld      hl,#4a5f
0a95  cd6e54    call    #546e
0a98  cde1a5    call    #a5e1
0a9b  cde1a5    call    #a5e1
0a9e  21584a    ld      hl,#4a58
0aa1  cd6e54    call    #546e
0aa4  2157f1    ld      hl,#f157
0aa7  cd6e54    call    #546e
0aaa  cde1a5    call    #a5e1
0aad  dd36f900  ld      (ix-#07),#00
0ab1  dd36f801  ld      (ix-#08),#01
0ab5  dd7ef9    ld      a,(ix-#07)
0ab8  fe08      cp      #08
0aba  d2074b    jp      nc,#4b07
0abd  3adaf0    ld      a,(#f0da)
0ac0  6f        ld      l,a
0ac1  dda6f8    and     (ix-#08)
0ac4  ca634b    jp      z,#4b63
0ac7  21504a    ld      hl,#4a50
0aca  cd6e54    call    #546e
0acd  dd4ef9    ld      c,(ix-#07)
0ad0  97        sub     a
0ad1  47        ld      b,a
0ad2  69        ld      l,c
0ad3  60        ld      h,b
0ad4  5d        ld      e,l
0ad5  54        ld      d,h
0ad6  29        add     hl,hl
0ad7  19        add     hl,de
0ad8  29        add     hl,hl
0ad9  19        add     hl,de
0ada  01dbf0    ld      bc,#f0db
0add  09        add     hl,bc
0ade  cd6e54    call    #546e
0ae1  3a13f1    ld      a,(#f113)
0ae4  6f        ld      l,a
0ae5  dda6f8    and     (ix-#08)
0ae8  2805      jr      z,#0aef         ; (5)
0aea  014b4a    ld      bc,#4a4b
0aed  1803      jr      #0af2           ; (3)
0aef  01474a    ld      bc,#4a47
0af2  69        ld      l,c
0af3  60        ld      h,b
0af4  cd6e54    call    #546e
0af7  cde1a5    call    #a5e1
0afa  2e00      ld      l,#00
0afc  cd7c76    call    #767c
0aff  79        ld      a,c
0b00  b7        or      a
0b01  ca634b    jp      z,#4b63
0b04  c372be    jp      #be72
0b07  cde1a5    call    #a5e1
0b0a  dd36f900  ld      (ix-#07),#00
0b0e  dd5ef9    ld      e,(ix-#07)
0b11  97        sub     a
0b12  57        ld      d,a
0b13  7b        ld      a,e
0b14  d607      sub     #07
0b16  7a        ld      a,d
0b17  de00      sbc     a,#00
0b19  f2704b    jp      p,#4b70
0b1c  21414a    ld      hl,#4a41
0b1f  cd6e54    call    #546e
0b22  dd4ef9    ld      c,(ix-#07)
0b25  97        sub     a
0b26  47        ld      b,a
0b27  69        ld      l,c
0b28  60        ld      h,b
0b29  29        add     hl,hl
0b2a  018849    ld      bc,#4988
0b2d  09        add     hl,bc
0b2e  7e        ld      a,(hl)
0b2f  23        inc     hl
0b30  66        ld      h,(hl)
0b31  6f        ld      l,a
0b32  cd6e54    call    #546e
0b35  216549    ld      hl,#4965
0b38  dd5ef9    ld      e,(ix-#07)
0b3b  97        sub     a
0b3c  57        ld      d,a
0b3d  19        add     hl,de
0b3e  6e        ld      l,(hl)
0b3f  3a14f1    ld      a,(#f114)
0b42  4f        ld      c,a
0b43  a5        and     l
0b44  2805      jr      z,#0b4b         ; (5)
0b46  013c4a    ld      bc,#4a3c
0b49  1803      jr      #0b4e           ; (3)
0b4b  01384a    ld      bc,#4a38
0b4e  69        ld      l,c
0b4f  60        ld      h,b
0b50  cd6e54    call    #546e
0b53  cde1a5    call    #a5e1
0b56  2e00      ld      l,#00
0b58  cd7c76    call    #767c
0b5b  79        ld      a,c
0b5c  b7        or      a
0b5d  ca0b4c    jp      z,#4c0b
0b60  c372be    jp      #be72
0b63  dd34f9    inc     (ix-#07)
0b66  dd7ef8    ld      a,(ix-#08)
0b69  87        add     a,a
0b6a  dd77f8    ld      (ix-#08),a
0b6d  c3b54a    jp      #4ab5
0b70  cde1a5    call    #a5e1
0b73  21274a    ld      hl,#4a27
0b76  cd6e54    call    #546e
0b79  3a15f1    ld      a,(#f115)
0b7c  b7        or      a
0b7d  2805      jr      z,#0b84         ; (5)
0b7f  01234a    ld      bc,#4a23
0b82  1803      jr      #0b87           ; (3)
0b84  01204a    ld      bc,#4a20
0b87  69        ld      l,c
0b88  60        ld      h,b
0b89  cd6e54    call    #546e
0b8c  cde1a5    call    #a5e1
0b8f  21084a    ld      hl,#4a08
0b92  cd6e54    call    #546e
0b95  3abef0    ld      a,(#f0be)
0b98  b7        or      a
0b99  2805      jr      z,#0ba0         ; (5)
0b9b  01044a    ld      bc,#4a04
0b9e  1803      jr      #0ba3           ; (3)
0ba0  01014a    ld      bc,#4a01
0ba3  69        ld      l,c
0ba4  60        ld      h,b
0ba5  cd6e54    call    #546e
0ba8  cde1a5    call    #a5e1
0bab  cde1a5    call    #a5e1
0bae  dd36f900  ld      (ix-#07),#00
0bb2  dd5ef9    ld      e,(ix-#07)
0bb5  97        sub     a
0bb6  57        ld      d,a
0bb7  7b        ld      a,e
0bb8  d607      sub     #07
0bba  7a        ld      a,d
0bbb  de00      sbc     a,#00
0bbd  f2114c    jp      p,#4c11
0bc0  dd4ef9    ld      c,(ix-#07)
0bc3  97        sub     a
0bc4  47        ld      b,a
0bc5  69        ld      l,c
0bc6  60        ld      h,b
0bc7  29        add     hl,hl
0bc8  014504    ld      bc,#0445
0bcb  09        add     hl,bc
0bcc  7e        ld      a,(hl)
0bcd  23        inc     hl
0bce  66        ld      h,(hl)
0bcf  6f        ld      l,a
0bd0  cd6e54    call    #546e
0bd3  218149    ld      hl,#4981
0bd6  dd5ef9    ld      e,(ix-#07)
0bd9  97        sub     a
0bda  57        ld      d,a
0bdb  19        add     hl,de
0bdc  6e        ld      l,(hl)
0bdd  e5        push    hl
0bde  217a49    ld      hl,#497a
0be1  dd5ef9    ld      e,(ix-#07)
0be4  97        sub     a
0be5  57        ld      d,a
0be6  19        add     hl,de
0be7  6e        ld      l,(hl)
0be8  e5        push    hl
0be9  dd4ef9    ld      c,(ix-#07)
0bec  97        sub     a
0bed  47        ld      b,a
0bee  69        ld      l,c
0bef  60        ld      h,b
0bf0  29        add     hl,hl
0bf1  016c49    ld      bc,#496c
0bf4  09        add     hl,bc
0bf5  7e        ld      a,(hl)
0bf6  23        inc     hl
0bf7  66        ld      h,(hl)
0bf8  6f        ld      l,a
0bf9  cd31aa    call    #aa31
0bfc  cde1a5    call    #a5e1
0bff  2e00      ld      l,#00
0c01  cd7c76    call    #767c
0c04  79        ld      a,c
0c05  b7        or      a
0c06  280f      jr      z,#0c17         ; (15)
0c08  c372be    jp      #be72
0c0b  dd34f9    inc     (ix-#07)
0c0e  c30e4b    jp      #4b0e
0c11  2e4b      ld      l,#4b
0c13  d7        rst     #10
0c14  c372be    jp      #be72
0c17  dd34f9    inc     (ix-#07)
0c1a  c3b24b    jp      #4bb2
0c1d  4c        ld      c,h
0c1e  49        ld      c,c
0c1f  53        ld      d,e
0c20  54        ld      d,h
0c21  2041      jr      nz,#0c64        ; (65)
0c23  4c        ld      c,h
0c24  4c        ld      c,h
0c25  2050      jr      nz,#0c77        ; (80)
0c27  52        ld      d,d
0c28  4f        ld      c,a
0c29  47        ld      b,a
0c2a  52        ld      d,d
0c2b  41        ld      b,c
0c2c  4d        ld      c,l
0c2d  53        ld      d,e
0c2e  202d      jr      nz,#0c5d        ; (45)
0c30  00        nop     
0c31  f7        rst     #30
0c32  21f9ff    ld      hl,#fff9
0c35  39        add     hl,sp
0c36  f9        ld      sp,hl
0c37  2e58      ld      l,#58
0c39  cf        rst     #8
0c3a  3a4ff3    ld      a,(#f34f)
0c3d  fe00      cp      #00
0c3f  2005      jr      nz,#0c46        ; (5)
0c41  3a50f3    ld      a,(#f350)
0c44  fec0      cp      #c0
0c46  2005      jr      nz,#0c4d        ; (5)
0c48  2e7a      ld      l,#7a
0c4a  d7        rst     #10
0c4b  182b      jr      #0c78           ; (43)
0c4d  211d4c    ld      hl,#4c1d
0c50  ef        rst     #28
0c51  dd36f900  ld      (ix-#07),#00
0c55  dd7ef9    ld      a,(ix-#07)
0c58  fe64      cp      #64
0c5a  3019      jr      nc,#0c75        ; (25)
0c5c  dd4ef9    ld      c,(ix-#07)
0c5f  97        sub     a
0c60  47        ld      b,a
0c61  69        ld      l,c
0c62  60        ld      h,b
0c63  29        add     hl,hl
0c64  015ff3    ld      bc,#f35f
0c67  09        add     hl,bc
0c68  7e        ld      a,(hl)
0c69  23        inc     hl
0c6a  b6        or      (hl)
0c6b  2813      jr      z,#0c80         ; (19)
0c6d  dd6ef9    ld      l,(ix-#07)
0c70  cda74c    call    #4ca7
0c73  180b      jr      #0c80           ; (11)
0c75  2e4b      ld      l,#4b
0c77  d7        rst     #10
0c78  c372be    jp      #be72
0c7b  dd34f9    inc     (ix-#07)
0c7e  18d5      jr      #0c55           ; (-43)
0c80  2e00      ld      l,#00
0c82  cd7c76    call    #767c
0c85  79        ld      a,c
0c86  b7        or      a
0c87  28f2      jr      z,#0c7b         ; (-14)
0c89  c372be    jp      #be72
0c8c  2020      jr      nz,#0cae        ; (32)
0c8e  2000      jr      nz,#0c90        ; (0)
0c90  3a2000    ld      a,(#0020)
0c93  2042      jr      nz,#0cd7        ; (66)
0c95  59        ld      e,c
0c96  54        ld      d,h
0c97  45        ld      b,l
0c98  53        ld      d,e
0c99  00        nop     
0c9a  2020      jr      nz,#0cbc        ; (32)
0c9c  2000      jr      nz,#0c9e        ; (0)
0c9e  50        ld      d,b
0c9f  52        ld      d,d
0ca0  4f        ld      c,a
0ca1  47        ld      b,a
0ca2  52        ld      d,d
0ca3  41        ld      b,c
0ca4  4d        ld      c,l
0ca5  2000      jr      nz,#0ca7        ; (0)
0ca7  e7        rst     #20
0ca8  f5        push    af
0ca9  f5        push    af
0caa  f5        push    af
0cab  f5        push    af
0cac  cde1a5    call    #a5e1
0caf  219e4c    ld      hl,#4c9e
0cb2  cd6e54    call    #546e
0cb5  dd7e04    ld      a,(ix+#04)
0cb8  32c7f0    ld      (#f0c7),a
0cbb  2e01      ld      l,#01
0cbd  e5        push    hl
0cbe  2e0a      ld      l,#0a
0cc0  e5        push    hl
0cc1  21c5f0    ld      hl,#f0c5
0cc4  cd31aa    call    #aa31
0cc7  219a4c    ld      hl,#4c9a
0cca  cd6e54    call    #546e
0ccd  dd6e04    ld      l,(ix+#04)
0cd0  cd319b    call    #9b31
0cd3  c5        push    bc
0cd4  dd4e04    ld      c,(ix+#04)
0cd7  97        sub     a
0cd8  47        ld      b,a
0cd9  69        ld      l,c
0cda  60        ld      h,b
0cdb  29        add     hl,hl
0cdc  015ff3    ld      bc,#f35f
0cdf  09        add     hl,bc
0ce0  c1        pop     bc
0ce1  79        ld      a,c
0ce2  96        sub     (hl)
0ce3  4f        ld      c,a
0ce4  78        ld      a,b
0ce5  23        inc     hl
0ce6  9e        sbc     a,(hl)
0ce7  47        ld      b,a
0ce8  97        sub     a
0ce9  3247f3    ld      (#f347),a
0cec  3248f3    ld      (#f348),a
0cef  79        ld      a,c
0cf0  3249f3    ld      (#f349),a
0cf3  78        ld      a,b
0cf4  324af3    ld      (#f34a),a
0cf7  2e01      ld      l,#01
0cf9  e5        push    hl
0cfa  2e0a      ld      l,#0a
0cfc  e5        push    hl
0cfd  2147f3    ld      hl,#f347
0d00  cd31aa    call    #aa31
0d03  21934c    ld      hl,#4c93
0d06  cd6e54    call    #546e
0d09  cde1a5    call    #a5e1
0d0c  cde1a5    call    #a5e1
0d0f  dd4e04    ld      c,(ix+#04)
0d12  97        sub     a
0d13  47        ld      b,a
0d14  69        ld      l,c
0d15  60        ld      h,b
0d16  29        add     hl,hl
0d17  015ff3    ld      bc,#f35f
0d1a  09        add     hl,bc
0d1b  7e        ld      a,(hl)
0d1c  23        inc     hl
0d1d  66        ld      h,(hl)
0d1e  6f        ld      l,a
0d1f  23        inc     hl
0d20  dd75f8    ld      (ix-#08),l
0d23  dd74f9    ld      (ix-#07),h
0d26  dd6ef8    ld      l,(ix-#08)
0d29  dd66f9    ld      h,(ix-#07)
0d2c  7e        ld      a,(hl)
0d2d  fe50      cp      #50
0d2f  283f      jr      z,#0d70         ; (63)
0d31  dd6ef8    ld      l,(ix-#08)
0d34  dd66f9    ld      h,(ix-#07)
0d37  7e        ld      a,(hl)
0d38  fe2b      cp      #2b
0d3a  c2854d    jp      nz,#4d85
0d3d  dd6ef8    ld      l,(ix-#08)
0d40  dd66f9    ld      h,(ix-#07)
0d43  23        inc     hl
0d44  3e09      ld      a,#09
0d46  be        cp      (hl)
0d47  fa574d    jp      m,#4d57
0d4a  dd6ef8    ld      l,(ix-#08)
0d4d  dd66f9    ld      h,(ix-#07)
0d50  23        inc     hl
0d51  7e        ld      a,(hl)
0d52  c630      add     a,#30
0d54  4f        ld      c,a
0d55  180d      jr      #0d64           ; (13)
0d57  dd6ef8    ld      l,(ix-#08)
0d5a  dd66f9    ld      h,(ix-#07)
0d5d  23        inc     hl
0d5e  7e        ld      a,(hl)
0d5f  c641      add     a,#41
0d61  c6f6      add     a,#f6
0d63  4f        ld      c,a
0d64  69        ld      l,c
0d65  cda054    call    #54a0
0d68  21904c    ld      hl,#4c90
0d6b  cd6e54    call    #546e
0d6e  181b      jr      #0d8b           ; (27)
0d70  c384be    jp      #be84
0d73  dd6ef8    ld      l,(ix-#08)
0d76  dd66f9    ld      h,(ix-#07)
0d79  cd0b9c    call    #9c0b
0d7c  dd71f8    ld      (ix-#08),c
0d7f  dd70f9    ld      (ix-#07),b
0d82  c3264d    jp      #4d26
0d85  218c4c    ld      hl,#4c8c
0d88  cd6e54    call    #546e
0d8b  dd6ef8    ld      l,(ix-#08)
0d8e  dd66f9    ld      h,(ix-#07)
0d91  cd0b9c    call    #9c0b
0d94  79        ld      a,c
0d95  dd96f8    sub     (ix-#08)
0d98  4f        ld      c,a
0d99  78        ld      a,b
0d9a  dd9ef9    sbc     a,(ix-#07)
0d9d  47        ld      b,a
0d9e  c5        push    bc
0d9f  dd6ef8    ld      l,(ix-#08)
0da2  dd66f9    ld      h,(ix-#07)
0da5  cd929e    call    #9e92
0da8  69        ld      l,c
0da9  60        ld      h,b
0daa  cd6e54    call    #546e
0dad  cde1a5    call    #a5e1
0db0  2e00      ld      l,#00
0db2  cd7c76    call    #767c
0db5  79        ld      a,c
0db6  b7        or      a
0db7  28ba      jr      z,#0d73         ; (-70)
0db9  c384be    jp      #be84
0dbc  2045      jr      nz,#0e03        ; (69)
0dbe  52        ld      d,d
0dbf  52        ld      d,d
0dc0  4f        ld      c,a
0dc1  52        ld      d,d
0dc2  00        nop     
0dc3  41        ld      b,c
0dc4  55        ld      d,l
0dc5  58        ld      e,b
0dc6  2d        dec     l
0dc7  52        ld      d,d
0dc8  45        ld      b,l
0dc9  43        ld      b,e
0dca  45        ld      b,l
0dcb  49        ld      c,c
0dcc  56        ld      d,(hl)
0dcd  49        ld      c,c
0dce  4e        ld      c,(hl)
0dcf  47        ld      b,a
0dd0  202d      jr      nz,#0dff        ; (45)
0dd2  00        nop     
0dd3  41        ld      b,c
0dd4  55        ld      d,l
0dd5  58        ld      e,b
0dd6  2d        dec     l
0dd7  52        ld      d,d
0dd8  45        ld      b,l
0dd9  43        ld      b,e
0dda  45        ld      b,l
0ddb  49        ld      c,c
0ddc  56        ld      d,(hl)
0ddd  45        ld      b,l
0dde  00        nop     
0ddf  f7        rst     #30
0de0  21f0ff    ld      hl,#fff0
0de3  39        add     hl,sp
0de4  f9        ld      sp,hl
0de5  2e58      ld      l,#58
0de7  cf        rst     #8
0de8  21d34d    ld      hl,#4dd3
0deb  ef        rst     #28
0dec  2e48      ld      l,#48
0dee  d7        rst     #10
0def  2e05      ld      l,#05
0df1  cd9573    call    #7395
0df4  79        ld      a,c
0df5  fe01      cp      #01
0df7  2006      jr      nz,#0dff        ; (6)
0df9  cde6b8    call    #b8e6
0dfc  c372be    jp      #be72
0dff  3a27f1    ld      a,(#f127)
0e02  fe1d      cp      #1d
0e04  200c      jr      nz,#0e12        ; (12)
0e06  2e5a      ld      l,#5a
0e08  cf        rst     #8
0e09  2e63      ld      l,#63
0e0b  d7        rst     #10
0e0c  2e5e      ld      l,#5e
0e0e  d7        rst     #10
0e0f  c372be    jp      #be72
0e12  2e58      ld      l,#58
0e14  cf        rst     #8
0e15  21c34d    ld      hl,#4dc3
0e18  ef        rst     #28
0e19  3a3ef1    ld      a,(#f13e)
0e1c  32e6f2    ld      (#f2e6),a
0e1f  21a1f1    ld      hl,#f1a1
0e22  e5        push    hl
0e23  2129f4    ld      hl,#f429
0e26  e5        push    hl
0e27  215ff3    ld      hl,#f35f
0e2a  cdd79a    call    #9ad7
0e2d  97        sub     a
0e2e  323ef1    ld      (#f13e),a
0e31  21c800    ld      hl,#00c8
0e34  e5        push    hl
0e35  215ff3    ld      hl,#f35f
0e38  cdc3b8    call    #b8c3
0e3b  97        sub     a
0e3c  324ff3    ld      (#f34f),a
0e3f  3ec0      ld      a,#c0
0e41  3250f3    ld      (#f350),a
0e44  dd36f219  ld      (ix-#0e),#19
0e48  dd36f612  ld      (ix-#0a),#12
0e4c  cde1a5    call    #a5e1
0e4f  dde5      push    ix
0e51  c1        pop     bc
0e52  21f9ff    ld      hl,#fff9
0e55  09        add     hl,bc
0e56  cd8451    call    #5184
0e59  79        ld      a,c
0e5a  b7        or      a
0e5b  2815      jr      z,#0e72         ; (21)
0e5d  dd7ef9    ld      a,(ix-#07)
0e60  fe3a      cp      #3a
0e62  20eb      jr      nz,#0e4f        ; (-21)
0e64  dde5      push    ix
0e66  c1        pop     bc
0e67  21f0ff    ld      hl,#fff0
0e6a  09        add     hl,bc
0e6b  cda250    call    #50a2
0e6e  79        ld      a,c
0e6f  b7        or      a
0e70  280a      jr      z,#0e7c         ; (10)
0e72  21bc4d    ld      hl,#4dbc
0e75  ef        rst     #28
0e76  cdab04    call    #04ab
0e79  c372be    jp      #be72
0e7c  dd7ef0    ld      a,(ix-#10)
0e7f  b7        or      a
0e80  200f      jr      nz,#0e91        ; (15)
0e82  2a4ff3    ld      hl,(#f34f)
0e85  2227f4    ld      (#f427),hl
0e88  cdddb8    call    #b8dd
0e8b  2e4b      ld      l,#4b
0e8d  d7        rst     #10
0e8e  c372be    jp      #be72
0e91  3e18      ld      a,#18
0e93  ddbef0    cp      (ix-#10)
0e96  381b      jr      c,#0eb3         ; (27)
0e98  dd6ef0    ld      l,(ix-#10)
0e9b  7d        ld      a,l
0e9c  87        add     a,a
0e9d  5f        ld      e,a
0e9e  87        add     a,a
0e9f  83        add     a,e
0ea0  6f        ld      l,a
0ea1  4d        ld      c,l
0ea2  97        sub     a
0ea3  47        ld      b,a
0ea4  69        ld      l,c
0ea5  60        ld      h,b
0ea6  019c44    ld      bc,#449c
0ea9  09        add     hl,bc
0eaa  cd514f    call    #4f51
0ead  79        ld      a,c
0eae  b7        or      a
0eaf  2013      jr      nz,#0ec4        ; (19)
0eb1  18bf      jr      #0e72           ; (-65)
0eb3  dd7ef0    ld      a,(ix-#10)
0eb6  fe19      cp      #19
0eb8  201b      jr      nz,#0ed5        ; (27)
0eba  3a3ef1    ld      a,(#f13e)
0ebd  fe64      cp      #64
0ebf  382d      jr      c,#0eee         ; (45)
0ec1  c3724e    jp      #4e72
0ec4  dd7ef0    ld      a,(ix-#10)
0ec7  fe18      cp      #18
0ec9  c24f4e    jp      nz,#4e4f
0ecc  2ad5f4    ld      hl,(#f4d5)
0ecf  cd71be    call    #be71
0ed2  c372be    jp      #be72
0ed5  dd7ef0    ld      a,(ix-#10)
0ed8  fe1a      cp      #1a
0eda  c2724e    jp      nz,#4e72
0edd  dde5      push    ix
0edf  c1        pop     bc
0ee0  21f1ff    ld      hl,#fff1
0ee3  09        add     hl,bc
0ee4  cda250    call    #50a2
0ee7  79        ld      a,c
0ee8  b7        or      a
0ee9  2837      jr      z,#0f22         ; (55)
0eeb  c3724e    jp      #4e72
0eee  3a3ef1    ld      a,(#f13e)
0ef1  6f        ld      l,a
0ef2  3a3ef1    ld      a,(#f13e)
0ef5  c601      add     a,#01
0ef7  323ef1    ld      (#f13e),a
0efa  4d        ld      c,l
0efb  97        sub     a
0efc  47        ld      b,a
0efd  c5        push    bc
0efe  211200    ld      hl,#0012
0f01  e5        push    hl
0f02  cd2dba    call    #ba2d
0f05  e1        pop     hl
0f06  01aee9    ld      bc,#e9ae
0f09  09        add     hl,bc
0f0a  dd75f4    ld      (ix-#0c),l
0f0d  dd74f5    ld      (ix-#0b),h
0f10  dde5      push    ix
0f12  c1        pop     bc
0f13  21f2ff    ld      hl,#fff2
0f16  09        add     hl,bc
0f17  cd514f    call    #4f51
0f1a  79        ld      a,c
0f1b  b7        or      a
0f1c  c24f4e    jp      nz,#4e4f
0f1f  c3724e    jp      #4e72
0f22  dde5      push    ix
0f24  c1        pop     bc
0f25  21f9ff    ld      hl,#fff9
0f28  09        add     hl,bc
0f29  cda250    call    #50a2
0f2c  79        ld      a,c
0f2d  b7        or      a
0f2e  c2724e    jp      nz,#4e72
0f31  dd6ef1    ld      l,(ix-#0f)
0f34  7d        ld      a,l
0f35  c61a      add     a,#1a
0f37  6f        ld      l,a
0f38  ddbef9    cp      (ix-#07)
0f3b  2806      jr      z,#0f43         ; (6)
0f3d  2e7b      ld      l,#7b
0f3f  d7        rst     #10
0f40  c3724e    jp      #4e72
0f43  dd6ef1    ld      l,(ix-#0f)
0f46  cdec4f    call    #4fec
0f49  79        ld      a,c
0f4a  b7        or      a
0f4b  c24f4e    jp      nz,#4e4f
0f4e  c3724e    jp      #4e72
0f51  e7        rst     #20
0f52  21f4ff    ld      hl,#fff4
0f55  39        add     hl,sp
0f56  f9        ld      sp,hl
0f57  dd6e04    ld      l,(ix+#04)
0f5a  dd6605    ld      h,(ix+#05)
0f5d  23        inc     hl
0f5e  23        inc     hl
0f5f  7e        ld      a,(hl)
0f60  dd77f4    ld      (ix-#0c),a
0f63  23        inc     hl
0f64  7e        ld      a,(hl)
0f65  dd77f5    ld      (ix-#0b),a
0f68  dd6e04    ld      l,(ix+#04)
0f6b  dd6605    ld      h,(ix+#05)
0f6e  7e        ld      a,(hl)
0f6f  dd77f8    ld      (ix-#08),a
0f72  dd36f700  ld      (ix-#09),#00
0f76  dd6e04    ld      l,(ix+#04)
0f79  dd6605    ld      h,(ix+#05)
0f7c  23        inc     hl
0f7d  23        inc     hl
0f7e  23        inc     hl
0f7f  23        inc     hl
0f80  dd7ef7    ld      a,(ix-#09)
0f83  be        cp      (hl)
0f84  3013      jr      nc,#0f99        ; (19)
0f86  dde5      push    ix
0f88  c1        pop     bc
0f89  21f9ff    ld      hl,#fff9
0f8c  09        add     hl,bc
0f8d  cda250    call    #50a2
0f90  79        ld      a,c
0f91  b7        or      a
0f92  2818      jr      z,#0fac         ; (24)
0f94  0e00      ld      c,#00
0f96  c384be    jp      #be84
0f99  dde5      push    ix
0f9b  c1        pop     bc
0f9c  21f9ff    ld      hl,#fff9
0f9f  09        add     hl,bc
0fa0  cda250    call    #50a2
0fa3  79        ld      a,c
0fa4  b7        or      a
0fa5  2826      jr      z,#0fcd         ; (38)
0fa7  0e00      ld      c,#00
0fa9  c384be    jp      #be84
0fac  dd7ef8    ld      a,(ix-#08)
0faf  dd86f9    add     a,(ix-#07)
0fb2  dd77f8    ld      (ix-#08),a
0fb5  dd6ef4    ld      l,(ix-#0c)
0fb8  dd66f5    ld      h,(ix-#0b)
0fbb  dd34f4    inc     (ix-#0c)
0fbe  2003      jr      nz,#0fc3        ; (3)
0fc0  dd34f5    inc     (ix-#0b)
0fc3  dd7ef9    ld      a,(ix-#07)
0fc6  77        ld      (hl),a
0fc7  dd34f7    inc     (ix-#09)
0fca  c3764f    jp      #4f76
0fcd  dd7ef9    ld      a,(ix-#07)
0fd0  ddbef8    cp      (ix-#08)
0fd3  2808      jr      z,#0fdd         ; (8)
0fd5  2e7b      ld      l,#7b
0fd7  d7        rst     #10
0fd8  0e00      ld      c,#00
0fda  c384be    jp      #be84
0fdd  0e01      ld      c,#01
0fdf  c384be    jp      #be84
0fe2  204f      jr      nz,#1033        ; (79)
0fe4  56        ld      d,(hl)
0fe5  45        ld      b,l
0fe6  52        ld      d,d
0fe7  46        ld      b,(hl)
0fe8  4c        ld      c,h
0fe9  4f        ld      c,a
0fea  57        ld      d,a
0feb  00        nop     
0fec  e7        rst     #20
0fed  21f7ff    ld      hl,#fff7
0ff0  39        add     hl,sp
0ff1  f9        ld      sp,hl
0ff2  dd4e04    ld      c,(ix+#04)
0ff5  97        sub     a
0ff6  47        ld      b,a
0ff7  69        ld      l,c
0ff8  60        ld      h,b
0ff9  29        add     hl,hl
0ffa  015ff3    ld      bc,#f35f
0ffd  09        add     hl,bc
0ffe  3a4ff3    ld      a,(#f34f)
1001  77        ld      (hl),a
1002  3a50f3    ld      a,(#f350)
1005  23        inc     hl
1006  77        ld      (hl),a
1007  dde5      push    ix
1009  c1        pop     bc
100a  21f9ff    ld      hl,#fff9
100d  09        add     hl,bc
100e  cd8451    call    #5184
1011  79        ld      a,c
1012  b7        or      a
1013  2005      jr      nz,#101a        ; (5)
1015  0e00      ld      c,#00
1017  c384be    jp      #be84
101a  dd7ef9    ld      a,(ix-#07)
101d  fe3a      cp      #3a
101f  20e6      jr      nz,#1007        ; (-26)
1021  dd36f800  ld      (ix-#08),#00
1025  dde5      push    ix
1027  c1        pop     bc
1028  21f9ff    ld      hl,#fff9
102b  09        add     hl,bc
102c  cda250    call    #50a2
102f  dd71f7    ld      (ix-#09),c
1032  dd7ef7    ld      a,(ix-#09)
1035  fe01      cp      #01
1037  2005      jr      nz,#103e        ; (5)
1039  0e00      ld      c,#00
103b  c384be    jp      #be84
103e  dd7ef7    ld      a,(ix-#09)
1041  b7        or      a
1042  2015      jr      nz,#1059        ; (21)
1044  214ff3    ld      hl,#f34f
1047  3eff      ld      a,#ff
1049  96        sub     (hl)
104a  3ee7      ld      a,#e7
104c  23        inc     hl
104d  9e        sbc     a,(hl)
104e  301c      jr      nc,#106c        ; (28)
1050  21e24f    ld      hl,#4fe2
1053  ef        rst     #28
1054  0e00      ld      c,#00
1056  c384be    jp      #be84
1059  dde5      push    ix
105b  c1        pop     bc
105c  21f9ff    ld      hl,#fff9
105f  09        add     hl,bc
1060  cda250    call    #50a2
1063  79        ld      a,c
1064  b7        or      a
1065  281e      jr      z,#1085         ; (30)
1067  0e00      ld      c,#00
1069  c384be    jp      #be84
106c  2a4ff3    ld      hl,(#f34f)
106f  e5        push    hl
1070  23        inc     hl
1071  224ff3    ld      (#f34f),hl
1074  e1        pop     hl
1075  dd7ef9    ld      a,(ix-#07)
1078  77        ld      (hl),a
1079  dd7ef8    ld      a,(ix-#08)
107c  dd86f9    add     a,(ix-#07)
107f  dd77f8    ld      (ix-#08),a
1082  c32550    jp      #5025
1085  dd7ef8    ld      a,(ix-#08)
1088  ddbef9    cp      (ix-#07)
108b  2808      jr      z,#1095         ; (8)
108d  2e7b      ld      l,#7b
108f  d7        rst     #10
1090  0e00      ld      c,#00
1092  c384be    jp      #be84
1095  dd7ef7    ld      a,(ix-#09)
1098  fe03      cp      #03
109a  c20750    jp      nz,#5007
109d  0e01      ld      c,#01
109f  c384be    jp      #be84
10a2  e7        rst     #20
10a3  f5        push    af
10a4  f5        push    af
10a5  f5        push    af
10a6  f5        push    af
10a7  dde5      push    ix
10a9  c1        pop     bc
10aa  21f9ff    ld      hl,#fff9
10ad  09        add     hl,bc
10ae  cd8451    call    #5184
10b1  79        ld      a,c
10b2  b7        or      a
10b3  2005      jr      nz,#10ba        ; (5)
10b5  0e01      ld      c,#01
10b7  c384be    jp      #be84
10ba  dd7ef9    ld      a,(ix-#07)
10bd  fe2a      cp      #2a
10bf  2005      jr      nz,#10c6        ; (5)
10c1  0e02      ld      c,#02
10c3  c384be    jp      #be84
10c6  dd7ef9    ld      a,(ix-#07)
10c9  fe24      cp      #24
10cb  2005      jr      nz,#10d2        ; (5)
10cd  0e03      ld      c,#03
10cf  c384be    jp      #be84
10d2  dd7ef9    ld      a,(ix-#07)
10d5  fe30      cp      #30
10d7  3811      jr      c,#10ea         ; (17)
10d9  3e39      ld      a,#39
10db  ddbef9    cp      (ix-#07)
10de  380a      jr      c,#10ea         ; (10)
10e0  dd7ef9    ld      a,(ix-#07)
10e3  d630      sub     #30
10e5  dd77f9    ld      (ix-#07),a
10e8  1816      jr      #1100           ; (22)
10ea  dd7ef9    ld      a,(ix-#07)
10ed  fe41      cp      #41
10ef  3822      jr      c,#1113         ; (34)
10f1  3e46      ld      a,#46
10f3  ddbef9    cp      (ix-#07)
10f6  381b      jr      c,#1113         ; (27)
10f8  dd7ef9    ld      a,(ix-#07)
10fb  d637      sub     #37
10fd  dd77f9    ld      (ix-#07),a
1100  dde5      push    ix
1102  c1        pop     bc
1103  21f8ff    ld      hl,#fff8
1106  09        add     hl,bc
1107  cd8451    call    #5184
110a  79        ld      a,c
110b  b7        or      a
110c  200a      jr      nz,#1118        ; (10)
110e  0e01      ld      c,#01
1110  c384be    jp      #be84
1113  0e01      ld      c,#01
1115  c384be    jp      #be84
1118  dd7ef8    ld      a,(ix-#08)
111b  fe30      cp      #30
111d  3811      jr      c,#1130         ; (17)
111f  3e39      ld      a,#39
1121  ddbef8    cp      (ix-#08)
1124  380a      jr      c,#1130         ; (10)
1126  dd7ef8    ld      a,(ix-#08)
1129  d630      sub     #30
112b  dd77f8    ld      (ix-#08),a
112e  1816      jr      #1146           ; (22)
1130  dd7ef8    ld      a,(ix-#08)
1133  fe41      cp      #41
1135  3827      jr      c,#115e         ; (39)
1137  3e46      ld      a,#46
1139  ddbef8    cp      (ix-#08)
113c  3820      jr      c,#115e         ; (32)
113e  dd7ef8    ld      a,(ix-#08)
1141  d637      sub     #37
1143  dd77f8    ld      (ix-#08),a
1146  dd6e04    ld      l,(ix+#04)
1149  dd6605    ld      h,(ix+#05)
114c  dd4ef9    ld      c,(ix-#07)
114f  79        ld      a,c
1150  87        add     a,a
1151  87        add     a,a
1152  87        add     a,a
1153  87        add     a,a
1154  ddb6f8    or      (ix-#08)
1157  4f        ld      c,a
1158  71        ld      (hl),c
1159  0e00      ld      c,#00
115b  c384be    jp      #be84
115e  0e01      ld      c,#01
1160  c384be    jp      #be84
1163  204f      jr      nz,#11b4        ; (79)
1165  56        ld      d,(hl)
1166  45        ld      b,l
1167  52        ld      d,d
1168  52        ld      d,d
1169  55        ld      d,l
116a  4e        ld      c,(hl)
116b  00        nop     
116c  2046      jr      nz,#11b4        ; (70)
116e  52        ld      d,d
116f  41        ld      b,c
1170  4d        ld      c,l
1171  49        ld      c,c
1172  4e        ld      c,(hl)
1173  47        ld      b,a
1174  00        nop     
1175  2050      jr      nz,#11c7        ; (80)
1177  41        ld      b,c
1178  52        ld      d,d
1179  49        ld      c,c
117a  54        ld      d,h
117b  59        ld      e,c
117c  00        nop     
117d  2041      jr      nz,#11c0        ; (65)
117f  42        ld      b,d
1180  4f        ld      c,a
1181  52        ld      d,d
1182  54        ld      d,h
1183  00        nop     
1184  e7        rst     #20
1185  21f9ff    ld      hl,#fff9
1188  39        add     hl,sp
1189  f9        ld      sp,hl
118a  2e81      ld      l,#81
118c  cd5cba    call    #ba5c
118f  cb41      bit     0,c
1191  2809      jr      z,#119c         ; (9)
1193  217d51    ld      hl,#517d
1196  ef        rst     #28
1197  0e00      ld      c,#00
1199  c384be    jp      #be84
119c  2ee2      ld      l,#e2
119e  cd5cba    call    #ba5c
11a1  dd71f9    ld      (ix-#07),c
11a4  dd6ef9    ld      l,(ix-#07)
11a7  cb5d      bit     3,l
11a9  28df      jr      z,#118a         ; (-33)
11ab  dd6ef9    ld      l,(ix-#07)
11ae  7d        ld      a,l
11af  e607      and     #07
11b1  280d      jr      z,#11c0         ; (13)
11b3  dd6ef9    ld      l,(ix-#07)
11b6  cb45      bit     0,l
11b8  2824      jr      z,#11de         ; (36)
11ba  217551    ld      hl,#5175
11bd  ef        rst     #28
11be  182f      jr      #11ef           ; (47)
11c0  dd6e04    ld      l,(ix+#04)
11c3  dd6605    ld      h,(ix+#05)
11c6  e5        push    hl
11c7  2ee1      ld      l,#e1
11c9  cd5cba    call    #ba5c
11cc  59        ld      e,c
11cd  97        sub     a
11ce  57        ld      d,a
11cf  7b        ld      a,e
11d0  e67f      and     #7f
11d2  5f        ld      e,a
11d3  e1        pop     hl
11d4  7a        ld      a,d
11d5  e6ff      and     #ff
11d7  57        ld      d,a
11d8  73        ld      (hl),e
11d9  0e01      ld      c,#01
11db  c384be    jp      #be84
11de  dd6ef9    ld      l,(ix-#07)
11e1  cb4d      bit     1,l
11e3  2806      jr      z,#11eb         ; (6)
11e5  216c51    ld      hl,#516c
11e8  ef        rst     #28
11e9  1804      jr      #11ef           ; (4)
11eb  216351    ld      hl,#5163
11ee  ef        rst     #28
11ef  0e00      ld      c,#00
11f1  c384be    jp      #be84
11f4  3a3030    ld      a,(#3030)
11f7  00        nop     
11f8  41        ld      b,c
11f9  55        ld      d,l
11fa  58        ld      e,b
11fb  2d        dec     l
11fc  53        ld      d,e
11fd  45        ld      b,l
11fe  4e        ld      c,(hl)
11ff  44        ld      b,h
1200  49        ld      c,c
1201  4e        ld      c,(hl)
1202  47        ld      b,a
1203  202d      jr      nz,#1232        ; (45)
1205  00        nop     
1206  f7        rst     #30
1207  21f3ff    ld      hl,#fff3
120a  39        add     hl,sp
120b  f9        ld      sp,hl
120c  2e58      ld      l,#58
120e  cf        rst     #8
120f  21f851    ld      hl,#51f8
1212  ef        rst     #28
1213  dd36f300  ld      (ix-#0d),#00
1217  dd7ef3    ld      a,(ix-#0d)
121a  fe17      cp      #17
121c  3020      jr      nc,#123e        ; (32)
121e  dd4ef3    ld      c,(ix-#0d)
1221  97        sub     a
1222  47        ld      b,a
1223  69        ld      l,c
1224  60        ld      h,b
1225  5d        ld      e,l
1226  54        ld      d,h
1227  29        add     hl,hl
1228  19        add     hl,de
1229  29        add     hl,hl
122a  01a244    ld      bc,#44a2
122d  09        add     hl,bc
122e  cda353    call    #53a3
1231  2e00      ld      l,#00
1233  cd7c76    call    #767c
1236  79        ld      a,c
1237  b7        or      a
1238  ca8152    jp      z,#5281
123b  c372be    jp      #be72
123e  dd36f419  ld      (ix-#0c),#19
1242  dd36f300  ld      (ix-#0d),#00
1246  213ef1    ld      hl,#f13e
1249  dd7ef3    ld      a,(ix-#0d)
124c  be        cp      (hl)
124d  3038      jr      nc,#1287        ; (56)
124f  dd4ef3    ld      c,(ix-#0d)
1252  97        sub     a
1253  47        ld      b,a
1254  c5        push    bc
1255  211200    ld      hl,#0012
1258  e5        push    hl
1259  cd2dba    call    #ba2d
125c  e1        pop     hl
125d  01aee9    ld      bc,#e9ae
1260  09        add     hl,bc
1261  dd75f6    ld      (ix-#0a),l
1264  dd74f7    ld      (ix-#09),h
1267  dd36f812  ld      (ix-#08),#12
126b  dde5      push    ix
126d  c1        pop     bc
126e  21f4ff    ld      hl,#fff4
1271  09        add     hl,bc
1272  cda353    call    #53a3
1275  2e00      ld      l,#00
1277  cd7c76    call    #767c
127a  79        ld      a,c
127b  b7        or      a
127c  2837      jr      z,#12b5         ; (55)
127e  c372be    jp      #be72
1281  dd34f3    inc     (ix-#0d)
1284  c31752    jp      #5217
1287  dd36f300  ld      (ix-#0d),#00
128b  dd7ef3    ld      a,(ix-#0d)
128e  fe64      cp      #64
1290  3029      jr      nc,#12bb        ; (41)
1292  dd4ef3    ld      c,(ix-#0d)
1295  97        sub     a
1296  47        ld      b,a
1297  69        ld      l,c
1298  60        ld      h,b
1299  29        add     hl,hl
129a  015ff3    ld      bc,#f35f
129d  09        add     hl,bc
129e  7e        ld      a,(hl)
129f  23        inc     hl
12a0  b6        or      (hl)
12a1  2827      jr      z,#12ca         ; (39)
12a3  dd6ef3    ld      l,(ix-#0d)
12a6  cdd052    call    #52d0
12a9  2e00      ld      l,#00
12ab  cd7c76    call    #767c
12ae  79        ld      a,c
12af  b7        or      a
12b0  2818      jr      z,#12ca         ; (24)
12b2  c372be    jp      #be72
12b5  dd34f3    inc     (ix-#0d)
12b8  c34652    jp      #5246
12bb  21f451    ld      hl,#51f4
12be  cd6e54    call    #546e
12c1  cde1a5    call    #a5e1
12c4  2e4b      ld      l,#4b
12c6  d7        rst     #10
12c7  c372be    jp      #be72
12ca  dd34f3    inc     (ix-#0d)
12cd  c38b52    jp      #528b
12d0  e7        rst     #20
12d1  21f2ff    ld      hl,#fff2
12d4  39        add     hl,sp
12d5  f9        ld      sp,hl
12d6  2e3a      ld      l,#3a
12d8  cda054    call    #54a0
12db  2e1a      ld      l,#1a
12dd  cd3254    call    #5432
12e0  dd6e04    ld      l,(ix+#04)
12e3  cd3254    call    #5432
12e6  dd6e04    ld      l,(ix+#04)
12e9  7d        ld      a,l
12ea  c61a      add     a,#1a
12ec  6f        ld      l,a
12ed  cd3254    call    #5432
12f0  cde1a5    call    #a5e1
12f3  3a37f1    ld      a,(#f137)
12f6  c6fa      add     a,#fa
12f8  6f        ld      l,a
12f9  dd75f4    ld      (ix-#0c),l
12fc  2e3a      ld      l,#3a
12fe  cda054    call    #54a0
1301  dd36f900  ld      (ix-#07),#00
1305  dd36f501  ld      (ix-#0b),#01
1309  dd6e04    ld      l,(ix+#04)
130c  cd319b    call    #9b31
130f  dd71f6    ld      (ix-#0a),c
1312  dd70f7    ld      (ix-#09),b
1315  dd4e04    ld      c,(ix+#04)
1318  97        sub     a
1319  47        ld      b,a
131a  69        ld      l,c
131b  60        ld      h,b
131c  29        add     hl,hl
131d  015ff3    ld      bc,#f35f
1320  09        add     hl,bc
1321  7e        ld      a,(hl)
1322  dd77f2    ld      (ix-#0e),a
1325  23        inc     hl
1326  7e        ld      a,(hl)
1327  dd77f3    ld      (ix-#0d),a
132a  dd7ef2    ld      a,(ix-#0e)
132d  dd96f6    sub     (ix-#0a)
1330  dd7ef3    ld      a,(ix-#0d)
1333  dd9ef7    sbc     a,(ix-#09)
1336  3025      jr      nc,#135d        ; (37)
1338  dd7ef5    ld      a,(ix-#0b)
133b  ddbef4    cp      (ix-#0c)
133e  3838      jr      c,#1378         ; (56)
1340  2e2a      ld      l,#2a
1342  cda054    call    #54a0
1345  dd6ef9    ld      l,(ix-#07)
1348  cd3254    call    #5432
134b  dd36f900  ld      (ix-#07),#00
134f  cde1a5    call    #a5e1
1352  2e3a      ld      l,#3a
1354  cda054    call    #54a0
1357  dd36f501  ld      (ix-#0b),#01
135b  181b      jr      #1378           ; (27)
135d  2e24      ld      l,#24
135f  cda054    call    #54a0
1362  dd6ef9    ld      l,(ix-#07)
1365  cd3254    call    #5432
1368  cde1a5    call    #a5e1
136b  c384be    jp      #be84
136e  dd34f2    inc     (ix-#0e)
1371  2003      jr      nz,#1376        ; (3)
1373  dd34f3    inc     (ix-#0d)
1376  18b2      jr      #132a           ; (-78)
1378  dd6ef2    ld      l,(ix-#0e)
137b  dd66f3    ld      h,(ix-#0d)
137e  6e        ld      l,(hl)
137f  cd3254    call    #5432
1382  dd6ef2    ld      l,(ix-#0e)
1385  dd66f3    ld      h,(ix-#0d)
1388  dd7ef9    ld      a,(ix-#07)
138b  86        add     a,(hl)
138c  dd77f9    ld      (ix-#07),a
138f  dd7ef5    ld      a,(ix-#0b)
1392  c602      add     a,#02
1394  dd77f5    ld      (ix-#0b),a
1397  2e00      ld      l,#00
1399  cd7c76    call    #767c
139c  79        ld      a,c
139d  b7        or      a
139e  28ce      jr      z,#136e         ; (-50)
13a0  c384be    jp      #be84
13a3  e7        rst     #20
13a4  21f5ff    ld      hl,#fff5
13a7  39        add     hl,sp
13a8  f9        ld      sp,hl
13a9  2e3a      ld      l,#3a
13ab  cda054    call    #54a0
13ae  dd6e04    ld      l,(ix+#04)
13b1  dd6605    ld      h,(ix+#05)
13b4  7e        ld      a,(hl)
13b5  dd77f9    ld      (ix-#07),a
13b8  dd6ef9    ld      l,(ix-#07)
13bb  cd3254    call    #5432
13be  dd36f800  ld      (ix-#08),#00
13c2  dd6e04    ld      l,(ix+#04)
13c5  dd6605    ld      h,(ix+#05)
13c8  23        inc     hl
13c9  23        inc     hl
13ca  7e        ld      a,(hl)
13cb  dd77f6    ld      (ix-#0a),a
13ce  23        inc     hl
13cf  7e        ld      a,(hl)
13d0  dd77f7    ld      (ix-#09),a
13d3  dd6e04    ld      l,(ix+#04)
13d6  dd6605    ld      h,(ix+#05)
13d9  23        inc     hl
13da  23        inc     hl
13db  23        inc     hl
13dc  23        inc     hl
13dd  dd7ef8    ld      a,(ix-#08)
13e0  be        cp      (hl)
13e1  302d      jr      nc,#1410        ; (45)
13e3  dd6ef6    ld      l,(ix-#0a)
13e6  dd66f7    ld      h,(ix-#09)
13e9  dd34f6    inc     (ix-#0a)
13ec  2003      jr      nz,#13f1        ; (3)
13ee  dd34f7    inc     (ix-#09)
13f1  7e        ld      a,(hl)
13f2  dd77f5    ld      (ix-#0b),a
13f5  dd6ef5    ld      l,(ix-#0b)
13f8  cd3254    call    #5432
13fb  dd7ef9    ld      a,(ix-#07)
13fe  dd86f5    add     a,(ix-#0b)
1401  dd77f9    ld      (ix-#07),a
1404  2e00      ld      l,#00
1406  cd7c76    call    #767c
1409  79        ld      a,c
140a  b7        or      a
140b  280f      jr      z,#141c         ; (15)
140d  c384be    jp      #be84
1410  dd6ef9    ld      l,(ix-#07)
1413  cd3254    call    #5432
1416  cde1a5    call    #a5e1
1419  c384be    jp      #be84
141c  dd34f8    inc     (ix-#08)
141f  18b2      jr      #13d3           ; (-78)
1421  3031      jr      nc,#1454        ; (49)
1423  323334    ld      (#3433),a
1426  35        dec     (hl)
1427  3637      ld      (hl),#37
1429  3839      jr      c,#1464         ; (57)
142b  41        ld      b,c
142c  42        ld      b,d
142d  43        ld      b,e
142e  44        ld      b,h
142f  45        ld      b,l
1430  46        ld      b,(hl)
1431  00        nop     
1432  e7        rst     #20
1433  97        sub     a
1434  32b9f0    ld      (#f0b9),a
1437  dd4e04    ld      c,(ix+#04)
143a  97        sub     a
143b  47        ld      b,a
143c  c5        push    bc
143d  210400    ld      hl,#0004
1440  e5        push    hl
1441  cddeb9    call    #b9de
1444  e1        pop     hl
1445  4d        ld      c,l
1446  7d        ld      a,l
1447  e60f      and     #0f
1449  6f        ld      l,a
144a  4d        ld      c,l
144b  97        sub     a
144c  47        ld      b,a
144d  69        ld      l,c
144e  60        ld      h,b
144f  012154    ld      bc,#5421
1452  09        add     hl,bc
1453  6e        ld      l,(hl)
1454  cda054    call    #54a0
1457  dd6e04    ld      l,(ix+#04)
145a  7d        ld      a,l
145b  e60f      and     #0f
145d  6f        ld      l,a
145e  4d        ld      c,l
145f  97        sub     a
1460  47        ld      b,a
1461  69        ld      l,c
1462  60        ld      h,b
1463  012154    ld      bc,#5421
1466  09        add     hl,bc
1467  6e        ld      l,(hl)
1468  cda054    call    #54a0
146b  c384be    jp      #be84
146e  e7        rst     #20
146f  dd6e04    ld      l,(ix+#04)
1472  dd6605    ld      h,(ix+#05)
1475  7e        ld      a,(hl)
1476  b7        or      a
1477  281b      jr      z,#1494         ; (27)
1479  dd6e04    ld      l,(ix+#04)
147c  dd6605    ld      h,(ix+#05)
147f  dd3404    inc     (ix+#04)
1482  2003      jr      nz,#1487        ; (3)
1484  dd3405    inc     (ix+#05)
1487  6e        ld      l,(hl)
1488  cda054    call    #54a0
148b  2e00      ld      l,#00
148d  cd7c76    call    #767c
1490  79        ld      a,c
1491  b7        or      a
1492  28db      jr      z,#146f         ; (-37)
1494  c384be    jp      #be84
1497  2053      jr      nz,#14ec        ; (83)
1499  54        ld      d,h
149a  41        ld      b,c
149b  4c        ld      c,h
149c  4c        ld      c,h
149d  45        ld      b,l
149e  44        ld      b,h
149f  00        nop     
14a0  e7        rst     #20
14a1  2ee2      ld      l,#e2
14a3  cd5cba    call    #ba5c
14a6  cb59      bit     3,c
14a8  2828      jr      z,#14d2         ; (40)
14aa  2ee1      ld      l,#e1
14ac  cd5cba    call    #ba5c
14af  212af3    ld      hl,#f32a
14b2  79        ld      a,c
14b3  be        cp      (hl)
14b4  201c      jr      nz,#14d2        ; (28)
14b6  219754    ld      hl,#5497
14b9  ef        rst     #28
14ba  2ee2      ld      l,#e2
14bc  cd5cba    call    #ba5c
14bf  cb59      bit     3,c
14c1  281d      jr      z,#14e0         ; (29)
14c3  2ee1      ld      l,#e1
14c5  cd5cba    call    #ba5c
14c8  2139f3    ld      hl,#f339
14cb  79        ld      a,c
14cc  be        cp      (hl)
14cd  2011      jr      nz,#14e0        ; (17)
14cf  2e5d      ld      l,#5d
14d1  cf        rst     #8
14d2  2137f1    ld      hl,#f137
14d5  3ab9f0    ld      a,(#f0b9)
14d8  be        cp      (hl)
14d9  3811      jr      c,#14ec         ; (17)
14db  cde1a5    call    #a5e1
14de  180c      jr      #14ec           ; (12)
14e0  2e00      ld      l,#00
14e2  cd7c76    call    #767c
14e5  79        ld      a,c
14e6  b7        or      a
14e7  28d1      jr      z,#14ba         ; (-47)
14e9  c384be    jp      #be84
14ec  3ab9f0    ld      a,(#f0b9)
14ef  c601      add     a,#01
14f1  32b9f0    ld      (#f0b9),a
14f4  2ee2      ld      l,#e2
14f6  cd5cba    call    #ba5c
14f9  cb61      bit     4,c
14fb  28f7      jr      z,#14f4         ; (-9)
14fd  dd6e04    ld      l,(ix+#04)
1500  e5        push    hl
1501  2ee3      ld      l,#e3
1503  cd62be    call    #be62
1506  c384be    jp      #be84
1509  aa        xor     d
150a  55        ld      d,l
150b  00        nop     
150c  00        nop     
150d  09        add     hl,bc
150e  55        ld      d,l
150f  02        ld      (bc),a
1510  00        nop     
1511  0b        dec     bc
1512  55        ld      d,l
1513  02        ld      (bc),a
1514  00        nop     
1515  14        inc     d
1516  f1        pop     af
1517  010013    ld      bc,#1300
151a  f1        pop     af
151b  0100c1    ld      bc,#c100
151e  f0        ret     p

151f  04        inc     b
1520  00        nop     
1521  e1        pop     hl
1522  f20400    jp      p,#0004
1525  33        inc     sp
1526  f3        di      
1527  04        inc     b
1528  00        nop     
1529  15        dec     d
152a  f1        pop     af
152b  010028    ld      bc,#2800
152e  f3        di      
152f  04        inc     b
1530  00        nop     
1531  37        scf     
1532  f3        di      
1533  04        inc     b
1534  00        nop     
1535  be        cp      (hl)
1536  f0        ret     p

1537  0100ba    ld      bc,#ba00
153a  f0        ret     p

153b  04        inc     b
153c  00        nop     
153d  35        dec     (hl)
153e  f1        pop     af
153f  04        inc     b
1540  00        nop     
1541  5f        ld      e,a
1542  f3        di      
1543  c8        ret     z

1544  00        nop     
1545  3ef1      ld      a,#f1
1547  0100d7    ld      bc,#d700
154a  f40200    call    p,#0002
154d  57        ld      d,a
154e  f1        pop     af
154f  07        rlca    
1550  00        nop     
1551  daf001    jp      c,#01f0
1554  00        nop     
1555  dbf0      in      a,(#f0)
1557  3800      jr      c,#1559         ; (0)
1559  00        nop     
155a  e8        ret     pe

155b  00        nop     
155c  010000    ld      bc,#0000
155f  00        nop     
1560  00        nop     
1561  02        ld      (bc),a
1562  1d        dec     e
1563  1c        inc     e
1564  2e56      ld      l,#56
1566  fc55f4    call    m,#f455
1569  55        ld      d,l
156a  f7        rst     #30
156b  21f6ff    ld      hl,#fff6
156e  39        add     hl,sp
156f  f9        ld      sp,hl
1570  3a27f1    ld      a,(#f127)
1573  fe3b      cp      #3b
1575  200b      jr      nz,#1582        ; (11)
1577  dd36f601  ld      (ix-#0a),#01
157b  3ef4      ld      a,#f4
157d  32d9f4    ld      (#f4d9),a
1580  1809      jr      #158b           ; (9)
1582  dd36f600  ld      (ix-#0a),#00
1586  3ee4      ld      a,#e4
1588  32d9f4    ld      (#f4d9),a
158b  dd36f901  ld      (ix-#07),#01
158f  2e71      ld      l,#71
1591  cf        rst     #8
1592  2e58      ld      l,#58
1594  cf        rst     #8
1595  3a27f1    ld      a,(#f127)
1598  6f        ld      l,a
1599  d7        rst     #10
159a  2e7f      ld      l,#7f
159c  d7        rst     #10
159d  2ea1      ld      l,#a1
159f  cd5cba    call    #ba5c
15a2  dd71f7    ld      (ix-#09),c
15a5  dd6ef7    ld      l,(ix-#09)
15a8  cb55      bit     2,l
15aa  2806      jr      z,#15b2         ; (6)
15ac  dd36f849  ld      (ix-#08),#49
15b0  1811      jr      #15c3           ; (17)
15b2  dd7ef6    ld      a,(ix-#0a)
15b5  b7        or      a
15b6  2822      jr      z,#15da         ; (34)
15b8  dd6ef7    ld      l,(ix-#09)
15bb  cb65      bit     4,l
15bd  281b      jr      z,#15da         ; (27)
15bf  dd36f84a  ld      (ix-#08),#4a
15c3  2e72      ld      l,#72
15c5  cf        rst     #8
15c6  dd7ef9    ld      a,(ix-#07)
15c9  fe02      cp      #02
15cb  ca3856    jp      z,#5638
15ce  dd6ef8    ld      l,(ix-#08)
15d1  e5        push    hl
15d2  2eff      ld      l,#ff
15d4  cd657f    call    #7f65
15d7  c33856    jp      #5638
15da  2e48      ld      l,#48
15dc  e5        push    hl
15dd  2eff      ld      l,#ff
15df  cd657f    call    #7f65
15e2  2e72      ld      l,#72
15e4  cf        rst     #8
15e5  2e05      ld      l,#05
15e7  cd9573    call    #7395
15ea  3a27f1    ld      a,(#f127)
15ed  4f        ld      c,a
15ee  216155    ld      hl,#5561
15f1  c3edb8    jp      #b8ed
15f4  dd36f85e  ld      (ix-#08),#5e
15f8  18c9      jr      #15c3           ; (-55)
15fa  18c7      jr      #15c3           ; (-57)
15fc  2e78      ld      l,#78
15fe  e5        push    hl
15ff  2eff      ld      l,#ff
1601  cd657f    call    #7f65
1604  2ea0      ld      l,#a0
1606  cd5cba    call    #ba5c
1609  dd7ef6    ld      a,(ix-#0a)
160c  b7        or      a
160d  2805      jr      z,#1614         ; (5)
160f  cd3e56    call    #563e
1612  1805      jr      #1619           ; (5)
1614  2e01      ld      l,#01
1616  cd3857    call    #5738
1619  dd71f9    ld      (ix-#07),c
161c  dd7ef9    ld      a,(ix-#07)
161f  b7        or      a
1620  2004      jr      nz,#1626        ; (4)
1622  0e66      ld      c,#66
1624  1802      jr      #1628           ; (2)
1626  0e69      ld      c,#69
1628  dd71f8    ld      (ix-#08),c
162b  c3c355    jp      #55c3
162e  cde6b8    call    #b8e6
1631  dd36f902  ld      (ix-#07),#02
1635  c3c355    jp      #55c3
1638  dd4ef9    ld      c,(ix-#07)
163b  c372be    jp      #be72
163e  f7        rst     #30
163f  21f9ff    ld      hl,#fff9
1642  39        add     hl,sp
1643  f9        ld      sp,hl
1644  cd1aae    call    #ae1a
1647  2a4ff3    ld      hl,(#f34f)
164a  010040    ld      bc,#4000
164d  09        add     hl,bc
164e  22d7f4    ld      (#f4d7),hl
1651  2e11      ld      l,#11
1653  cd1c5a    call    #5a1c
1656  dd71f9    ld      (ix-#07),c
1659  dd7ef9    ld      a,(ix-#07)
165c  b7        or      a
165d  c22857    jp      nz,#5728
1660  210d55    ld      hl,#550d
1663  22def4    ld      (#f4de),hl
1666  2adef4    ld      hl,(#f4de)
1669  7e        ld      a,(hl)
166a  23        inc     hl
166b  b6        or      (hl)
166c  2812      jr      z,#1680         ; (18)
166e  2adef4    ld      hl,(#f4de)
1671  cd9658    call    #5896
1674  dd71f9    ld      (ix-#07),c
1677  dd7ef9    ld      a,(ix-#07)
167a  b7        or      a
167b  282e      jr      z,#16ab         ; (46)
167d  c32857    jp      #5728
1680  21aee9    ld      hl,#e9ae
1683  22e0f4    ld      (#f4e0),hl
1686  3a3ef1    ld      a,(#f13e)
1689  4f        ld      c,a
168a  87        add     a,a
168b  9f        sbc     a,a
168c  47        ld      b,a
168d  c5        push    bc
168e  211200    ld      hl,#0012
1691  e5        push    hl
1692  cd2dba    call    #ba2d
1695  e1        pop     hl
1696  22e2f4    ld      (#f4e2),hl
1699  21e0f4    ld      hl,#f4e0
169c  cd9658    call    #5896
169f  dd71f9    ld      (ix-#07),c
16a2  dd7ef9    ld      a,(ix-#07)
16a5  b7        or      a
16a6  2810      jr      z,#16b8         ; (16)
16a8  c32857    jp      #5728
16ab  2adef4    ld      hl,(#f4de)
16ae  23        inc     hl
16af  23        inc     hl
16b0  23        inc     hl
16b1  23        inc     hl
16b2  22def4    ld      (#f4de),hl
16b5  c36656    jp      #5666
16b8  97        sub     a
16b9  32e0f4    ld      (#f4e0),a
16bc  3ec0      ld      a,#c0
16be  32e1f4    ld      (#f4e1),a
16c1  2ad7f4    ld      hl,(#f4d7)
16c4  22e2f4    ld      (#f4e2),hl
16c7  21e0f4    ld      hl,#f4e0
16ca  cd9658    call    #5896
16cd  dd71f9    ld      (ix-#07),c
16d0  dd7ef9    ld      a,(ix-#07)
16d3  b7        or      a
16d4  c22857    jp      nz,#5728
16d7  21e8f2    ld      hl,#f2e8
16da  22dcf4    ld      (#f4dc),hl
16dd  2128f3    ld      hl,#f328
16e0  3adcf4    ld      a,(#f4dc)
16e3  95        sub     l
16e4  3addf4    ld      a,(#f4dd)
16e7  9c        sbc     a,h
16e8  3014      jr      nc,#16fe        ; (20)
16ea  2adcf4    ld      hl,(#f4dc)
16ed  23        inc     hl
16ee  23        inc     hl
16ef  6e        ld      l,(hl)
16f0  cd0559    call    #5905
16f3  dd71f9    ld      (ix-#07),c
16f6  dd7ef9    ld      a,(ix-#07)
16f9  b7        or      a
16fa  2812      jr      z,#170e         ; (18)
16fc  182a      jr      #1728           ; (42)
16fe  2e13      ld      l,#13
1700  cd1c5a    call    #5a1c
1703  dd71f9    ld      (ix-#07),c
1706  dd7ef9    ld      a,(ix-#07)
1709  b7        or      a
170a  280e      jr      z,#171a         ; (14)
170c  181a      jr      #1728           ; (26)
170e  2adcf4    ld      hl,(#f4dc)
1711  23        inc     hl
1712  23        inc     hl
1713  23        inc     hl
1714  23        inc     hl
1715  22dcf4    ld      (#f4dc),hl
1718  18c3      jr      #16dd           ; (-61)
171a  2e00      ld      l,#00
171c  cd3857    call    #5738
171f  dd71f9    ld      (ix-#07),c
1722  dd7ef9    ld      a,(ix-#07)
1725  b7        or      a
1726  280b      jr      z,#1733         ; (11)
1728  2e13      ld      l,#13
172a  cd1c5a    call    #5a1c
172d  dd4ef9    ld      c,(ix-#07)
1730  c372be    jp      #be72
1733  0e00      ld      c,#00
1735  c372be    jp      #be72
1738  e7        rst     #20
1739  21f9ff    ld      hl,#fff9
173c  39        add     hl,sp
173d  f9        ld      sp,hl
173e  cd1aae    call    #ae1a
1741  3a3ef1    ld      a,(#f13e)
1744  32e6f2    ld      (#f2e6),a
1747  21a1f1    ld      hl,#f1a1
174a  e5        push    hl
174b  2129f4    ld      hl,#f429
174e  e5        push    hl
174f  215ff3    ld      hl,#f35f
1752  cdd79a    call    #9ad7
1755  2e12      ld      l,#12
1757  cd1c5a    call    #5a1c
175a  dd71f9    ld      (ix-#07),c
175d  dd7ef9    ld      a,(ix-#07)
1760  b7        or      a
1761  c27258    jp      nz,#5872
1764  2e00      ld      l,#00
1766  e5        push    hl
1767  210d55    ld      hl,#550d
176a  cd4559    call    #5945
176d  dd71f9    ld      (ix-#07),c
1770  dd7ef9    ld      a,(ix-#07)
1773  b7        or      a
1774  c27258    jp      nz,#5872
1777  2e01      ld      l,#01
1779  e5        push    hl
177a  211155    ld      hl,#5511
177d  cd4559    call    #5945
1780  dd71f9    ld      (ix-#07),c
1783  dd7ef9    ld      a,(ix-#07)
1786  b7        or      a
1787  c27258    jp      nz,#5872
178a  211555    ld      hl,#5515
178d  22e6f4    ld      (#f4e6),hl
1790  2ae6f4    ld      hl,(#f4e6)
1793  7e        ld      a,(hl)
1794  23        inc     hl
1795  b6        or      (hl)
1796  2816      jr      z,#17ae         ; (22)
1798  dd6e04    ld      l,(ix+#04)
179b  e5        push    hl
179c  2ae6f4    ld      hl,(#f4e6)
179f  cd4559    call    #5945
17a2  dd71f9    ld      (ix-#07),c
17a5  dd7ef9    ld      a,(ix-#07)
17a8  b7        or      a
17a9  2832      jr      z,#17dd         ; (50)
17ab  c37258    jp      #5872
17ae  21aee9    ld      hl,#e9ae
17b1  22eaf4    ld      (#f4ea),hl
17b4  3a3ef1    ld      a,(#f13e)
17b7  4f        ld      c,a
17b8  87        add     a,a
17b9  9f        sbc     a,a
17ba  47        ld      b,a
17bb  c5        push    bc
17bc  211200    ld      hl,#0012
17bf  e5        push    hl
17c0  cd2dba    call    #ba2d
17c3  e1        pop     hl
17c4  22ecf4    ld      (#f4ec),hl
17c7  dd6e04    ld      l,(ix+#04)
17ca  e5        push    hl
17cb  21eaf4    ld      hl,#f4ea
17ce  cd4559    call    #5945
17d1  dd71f9    ld      (ix-#07),c
17d4  dd7ef9    ld      a,(ix-#07)
17d7  b7        or      a
17d8  2810      jr      z,#17ea         ; (16)
17da  c37258    jp      #5872
17dd  2ae6f4    ld      hl,(#f4e6)
17e0  23        inc     hl
17e1  23        inc     hl
17e2  23        inc     hl
17e3  23        inc     hl
17e4  22e6f4    ld      (#f4e6),hl
17e7  c39057    jp      #5790
17ea  97        sub     a
17eb  32eaf4    ld      (#f4ea),a
17ee  3ec0      ld      a,#c0
17f0  32ebf4    ld      (#f4eb),a
17f3  2ad7f4    ld      hl,(#f4d7)
17f6  22ecf4    ld      (#f4ec),hl
17f9  dd6e04    ld      l,(ix+#04)
17fc  e5        push    hl
17fd  21eaf4    ld      hl,#f4ea
1800  cd4559    call    #5945
1803  dd71f9    ld      (ix-#07),c
1806  dd7ef9    ld      a,(ix-#07)
1809  b7        or      a
180a  c27258    jp      nz,#5872
180d  2ad7f4    ld      hl,(#f4d7)
1810  0100c0    ld      bc,#c000
1813  09        add     hl,bc
1814  224ff3    ld      (#f34f),hl
1817  2227f4    ld      (#f427),hl
181a  21e8f2    ld      hl,#f2e8
181d  22e8f4    ld      (#f4e8),hl
1820  2128f3    ld      hl,#f328
1823  3ae8f4    ld      a,(#f4e8)
1826  95        sub     l
1827  3ae9f4    ld      a,(#f4e9)
182a  9c        sbc     a,h
182b  3016      jr      nc,#1843        ; (22)
182d  2e00      ld      l,#00
182f  e5        push    hl
1830  2ae8f4    ld      hl,(#f4e8)
1833  23        inc     hl
1834  23        inc     hl
1835  cdb759    call    #59b7
1838  dd71f9    ld      (ix-#07),c
183b  dd7ef9    ld      a,(ix-#07)
183e  b7        or      a
183f  2817      jr      z,#1858         ; (23)
1841  182f      jr      #1872           ; (47)
1843  dd7e04    ld      a,(ix+#04)
1846  b7        or      a
1847  281b      jr      z,#1864         ; (27)
1849  3a00e8    ld      a,(#e800)
184c  b7        or      a
184d  2815      jr      z,#1864         ; (21)
184f  2100e8    ld      hl,#e800
1852  cd71be    call    #be71
1855  c384be    jp      #be84
1858  2ae8f4    ld      hl,(#f4e8)
185b  23        inc     hl
185c  23        inc     hl
185d  23        inc     hl
185e  23        inc     hl
185f  22e8f4    ld      (#f4e8),hl
1862  18bc      jr      #1820           ; (-68)
1864  2e13      ld      l,#13
1866  cd1c5a    call    #5a1c
1869  dd71f9    ld      (ix-#07),c
186c  dd7ef9    ld      a,(ix-#07)
186f  b7        or      a
1870  2810      jr      z,#1882         ; (16)
1872  2e13      ld      l,#13
1874  cd1c5a    call    #5a1c
1877  dd7e04    ld      a,(ix+#04)
187a  b7        or      a
187b  2813      jr      z,#1890         ; (19)
187d  cdab04    call    #04ab
1880  180e      jr      #1890           ; (14)
1882  dd7e04    ld      a,(ix+#04)
1885  b7        or      a
1886  2803      jr      z,#188b         ; (3)
1888  cdddb8    call    #b8dd
188b  0e00      ld      c,#00
188d  c384be    jp      #be84
1890  dd4ef9    ld      c,(ix-#07)
1893  c384be    jp      #be84
1896  e7        rst     #20
1897  21f9ff    ld      hl,#fff9
189a  39        add     hl,sp
189b  f9        ld      sp,hl
189c  dd6e04    ld      l,(ix+#04)
189f  dd6605    ld      h,(ix+#05)
18a2  23        inc     hl
18a3  23        inc     hl
18a4  7e        ld      a,(hl)
18a5  23        inc     hl
18a6  66        ld      h,(hl)
18a7  6f        ld      l,a
18a8  e5        push    hl
18a9  dd6e04    ld      l,(ix+#04)
18ac  dd6605    ld      h,(ix+#05)
18af  7e        ld      a,(hl)
18b0  23        inc     hl
18b1  66        ld      h,(hl)
18b2  6f        ld      l,a
18b3  e3        ex      (sp),hl
18b4  c1        pop     bc
18b5  09        add     hl,bc
18b6  22eef4    ld      (#f4ee),hl
18b9  dd6e04    ld      l,(ix+#04)
18bc  dd6605    ld      h,(ix+#05)
18bf  7e        ld      a,(hl)
18c0  23        inc     hl
18c1  66        ld      h,(hl)
18c2  6f        ld      l,a
18c3  22f0f4    ld      (#f4f0),hl
18c6  21eef4    ld      hl,#f4ee
18c9  3af0f4    ld      a,(#f4f0)
18cc  96        sub     (hl)
18cd  3af1f4    ld      a,(#f4f1)
18d0  23        inc     hl
18d1  9e        sbc     a,(hl)
18d2  3023      jr      nc,#18f7        ; (35)
18d4  2af0f4    ld      hl,(#f4f0)
18d7  7e        ld      a,(hl)
18d8  32c7f0    ld      (#f0c7),a
18db  21c5f0    ld      hl,#f0c5
18de  cd46ae    call    #ae46
18e1  2af0f4    ld      hl,(#f4f0)
18e4  6e        ld      l,(hl)
18e5  cd0559    call    #5905
18e8  dd71f9    ld      (ix-#07),c
18eb  dd7ef9    ld      a,(ix-#07)
18ee  b7        or      a
18ef  280b      jr      z,#18fc         ; (11)
18f1  dd4ef9    ld      c,(ix-#07)
18f4  c384be    jp      #be84
18f7  0e00      ld      c,#00
18f9  c384be    jp      #be84
18fc  2af0f4    ld      hl,(#f4f0)
18ff  23        inc     hl
1900  22f0f4    ld      (#f4f0),hl
1903  18c1      jr      #18c6           ; (-63)
1905  e7        rst     #20
1906  21f9ff    ld      hl,#fff9
1909  39        add     hl,sp
190a  f9        ld      sp,hl
190b  2ea1      ld      l,#a1
190d  cd5cba    call    #ba5c
1910  dd71f9    ld      (ix-#07),c
1913  dd6ef9    ld      l,(ix-#07)
1916  3ad9f4    ld      a,(#f4d9)
1919  4f        ld      c,a
191a  a5        and     l
191b  2805      jr      z,#1922         ; (5)
191d  0e01      ld      c,#01
191f  c384be    jp      #be84
1922  dd6ef9    ld      l,(ix-#07)
1925  cb4d      bit     1,l
1927  200e      jr      nz,#1937        ; (14)
1929  dd6e04    ld      l,(ix+#04)
192c  e5        push    hl
192d  2ea0      ld      l,#a0
192f  cd62be    call    #be62
1932  0e00      ld      c,#00
1934  c384be    jp      #be84
1937  2e00      ld      l,#00
1939  cd7c76    call    #767c
193c  79        ld      a,c
193d  b7        or      a
193e  28cb      jr      z,#190b         ; (-53)
1940  0e02      ld      c,#02
1942  c384be    jp      #be84
1945  e7        rst     #20
1946  21f9ff    ld      hl,#fff9
1949  39        add     hl,sp
194a  f9        ld      sp,hl
194b  dd6e04    ld      l,(ix+#04)
194e  dd6605    ld      h,(ix+#05)
1951  23        inc     hl
1952  23        inc     hl
1953  7e        ld      a,(hl)
1954  23        inc     hl
1955  66        ld      h,(hl)
1956  6f        ld      l,a
1957  e5        push    hl
1958  dd6e04    ld      l,(ix+#04)
195b  dd6605    ld      h,(ix+#05)
195e  7e        ld      a,(hl)
195f  23        inc     hl
1960  66        ld      h,(hl)
1961  6f        ld      l,a
1962  e3        ex      (sp),hl
1963  c1        pop     bc
1964  09        add     hl,bc
1965  22f2f4    ld      (#f4f2),hl
1968  dd6e04    ld      l,(ix+#04)
196b  dd6605    ld      h,(ix+#05)
196e  7e        ld      a,(hl)
196f  23        inc     hl
1970  66        ld      h,(hl)
1971  6f        ld      l,a
1972  22f4f4    ld      (#f4f4),hl
1975  21f2f4    ld      hl,#f4f2
1978  3af4f4    ld      a,(#f4f4)
197b  96        sub     (hl)
197c  3af5f4    ld      a,(#f4f5)
197f  23        inc     hl
1980  9e        sbc     a,(hl)
1981  3019      jr      nc,#199c        ; (25)
1983  dd6e06    ld      l,(ix+#06)
1986  e5        push    hl
1987  2af4f4    ld      hl,(#f4f4)
198a  cdb759    call    #59b7
198d  dd71f9    ld      (ix-#07),c
1990  dd7ef9    ld      a,(ix-#07)
1993  b7        or      a
1994  280b      jr      z,#19a1         ; (11)
1996  dd4ef9    ld      c,(ix-#07)
1999  c38bbe    jp      #be8b
199c  0e00      ld      c,#00
199e  c38bbe    jp      #be8b
19a1  2af4f4    ld      hl,(#f4f4)
19a4  7e        ld      a,(hl)
19a5  32c7f0    ld      (#f0c7),a
19a8  21c5f0    ld      hl,#f0c5
19ab  cd46ae    call    #ae46
19ae  2af4f4    ld      hl,(#f4f4)
19b1  23        inc     hl
19b2  22f4f4    ld      (#f4f4),hl
19b5  18be      jr      #1975           ; (-66)
19b7  e7        rst     #20
19b8  21f9ff    ld      hl,#fff9
19bb  39        add     hl,sp
19bc  f9        ld      sp,hl
19bd  2ea1      ld      l,#a1
19bf  cd5cba    call    #ba5c
19c2  dd71f9    ld      (ix-#07),c
19c5  dd6ef9    ld      l,(ix-#07)
19c8  3ad9f4    ld      a,(#f4d9)
19cb  4f        ld      c,a
19cc  a5        and     l
19cd  2805      jr      z,#19d4         ; (5)
19cf  0e01      ld      c,#01
19d1  c38bbe    jp      #be8b
19d4  dd6ef9    ld      l,(ix-#07)
19d7  cb45      bit     0,l
19d9  281d      jr      z,#19f8         ; (29)
19db  2ea0      ld      l,#a0
19dd  cd5cba    call    #ba5c
19e0  dd71f9    ld      (ix-#07),c
19e3  dd7e06    ld      a,(ix+#06)
19e6  b7        or      a
19e7  281d      jr      z,#1a06         ; (29)
19e9  dd6e04    ld      l,(ix+#04)
19ec  dd6605    ld      h,(ix+#05)
19ef  dd7ef9    ld      a,(ix-#07)
19f2  77        ld      (hl),a
19f3  0e00      ld      c,#00
19f5  c38bbe    jp      #be8b
19f8  2e00      ld      l,#00
19fa  cd7c76    call    #767c
19fd  79        ld      a,c
19fe  b7        or      a
19ff  28bc      jr      z,#19bd         ; (-68)
1a01  0e02      ld      c,#02
1a03  c38bbe    jp      #be8b
1a06  dd6e04    ld      l,(ix+#04)
1a09  dd6605    ld      h,(ix+#05)
1a0c  7e        ld      a,(hl)
1a0d  ddbef9    cp      (ix-#07)
1a10  2805      jr      z,#1a17         ; (5)
1a12  0e01      ld      c,#01
1a14  c38bbe    jp      #be8b
1a17  0e00      ld      c,#00
1a19  c38bbe    jp      #be8b
1a1c  e7        rst     #20
1a1d  21f9ff    ld      hl,#fff9
1a20  39        add     hl,sp
1a21  f9        ld      sp,hl
1a22  2ea1      ld      l,#a1
1a24  cd5cba    call    #ba5c
1a27  dd71f9    ld      (ix-#07),c
1a2a  dd6ef9    ld      l,(ix-#07)
1a2d  cb45      bit     0,l
1a2f  2805      jr      z,#1a36         ; (5)
1a31  2ea0      ld      l,#a0
1a33  cd5cba    call    #ba5c
1a36  dd6ef9    ld      l,(ix-#07)
1a39  cb4d      bit     1,l
1a3b  200e      jr      nz,#1a4b        ; (14)
1a3d  dd6e04    ld      l,(ix+#04)
1a40  e5        push    hl
1a41  2ea1      ld      l,#a1
1a43  cd62be    call    #be62
1a46  0e00      ld      c,#00
1a48  c384be    jp      #be84
1a4b  2e00      ld      l,#00
1a4d  cd7c76    call    #767c
1a50  79        ld      a,c
1a51  b7        or      a
1a52  28ce      jr      z,#1a22         ; (-50)
1a54  0e02      ld      c,#02
1a56  c384be    jp      #be84
1a59  53        ld      d,e
1a5a  54        ld      d,h
1a5b  45        ld      b,l
1a5c  50        ld      d,b
1a5d  2044      jr      nz,#1aa3        ; (68)
1a5f  45        ld      b,l
1a60  4c        ld      c,h
1a61  45        ld      b,l
1a62  54        ld      d,h
1a63  45        ld      b,l
1a64  44        ld      b,h
1a65  00        nop     
1a66  f7        rst     #30
1a67  21f4ff    ld      hl,#fff4
1a6a  39        add     hl,sp
1a6b  f9        ld      sp,hl
1a6c  212af4    ld      hl,#f42a
1a6f  3a5df3    ld      a,(#f35d)
1a72  be        cp      (hl)
1a73  2005      jr      nz,#1a7a        ; (5)
1a75  3a5ef3    ld      a,(#f35e)
1a78  23        inc     hl
1a79  be        cp      (hl)
1a7a  201d      jr      nz,#1a99        ; (29)
1a7c  3a25f1    ld      a,(#f125)
1a7f  b7        or      a
1a80  2017      jr      nz,#1a99        ; (23)
1a82  21ffe7    ld      hl,#e7ff
1a85  e5        push    hl
1a86  2a5bf3    ld      hl,(#f35b)
1a89  cd95ab    call    #ab95
1a8c  79        ld      a,c
1a8d  b7        or      a
1a8e  c2fd5a    jp      nz,#5afd
1a91  2e53      ld      l,#53
1a93  cd40a8    call    #a840
1a96  c3fd5a    jp      #5afd
1a99  2a5df3    ld      hl,(#f35d)
1a9c  7e        ld      a,(hl)
1a9d  fe50      cp      #50
1a9f  200c      jr      nz,#1aad        ; (12)
1aa1  3a25f1    ld      a,(#f125)
1aa4  b7        or      a
1aa5  2006      jr      nz,#1aad        ; (6)
1aa7  cd6f73    call    #736f
1aaa  c3fd5a    jp      #5afd
1aad  2e58      ld      l,#58
1aaf  cf        rst     #8
1ab0  3a25f1    ld      a,(#f125)
1ab3  b7        or      a
1ab4  2809      jr      z,#1abf         ; (9)
1ab6  2e75      ld      l,#75
1ab8  d7        rst     #10
1ab9  97        sub     a
1aba  3225f1    ld      (#f125),a
1abd  183b      jr      #1afa           ; (59)
1abf  2a5df3    ld      hl,(#f35d)
1ac2  e5        push    hl
1ac3  2a4df3    ld      hl,(#f34d)
1ac6  e5        push    hl
1ac7  2a55f3    ld      hl,(#f355)
1aca  cdd79a    call    #9ad7
1acd  2a55f3    ld      hl,(#f355)
1ad0  ed4b5df3  ld      bc,(#f35d)
1ad4  7d        ld      a,l
1ad5  91        sub     c
1ad6  6f        ld      l,a
1ad7  7c        ld      a,h
1ad8  98        sbc     a,b
1ad9  67        ld      h,a
1ada  3a4df3    ld      a,(#f34d)
1add  95        sub     l
1ade  324df3    ld      (#f34d),a
1ae1  3a4ef3    ld      a,(#f34e)
1ae4  9c        sbc     a,h
1ae5  324ef3    ld      (#f34e),a
1ae8  2a5df3    ld      hl,(#f35d)
1aeb  2255f3    ld      (#f355),hl
1aee  cd5f9b    call    #9b5f
1af1  69        ld      l,c
1af2  60        ld      h,b
1af3  225df3    ld      (#f35d),hl
1af6  21595a    ld      hl,#5a59
1af9  ef        rst     #28
1afa  cdcaaa    call    #aaca
1afd  c372be    jp      #be72
1b00  f7        rst     #30
1b01  97        sub     a
1b02  3225f1    ld      (#f125),a
1b05  2a5df3    ld      hl,(#f35d)
1b08  7e        ld      a,(hl)
1b09  fe50      cp      #50
1b0b  200f      jr      nz,#1b1c        ; (15)
1b0d  cdb47f    call    #7fb4
1b10  79        ld      a,c
1b11  fe75      cp      #75
1b13  2019      jr      nz,#1b2e        ; (25)
1b15  2e50      ld      l,#50
1b17  cd40a8    call    #a840
1b1a  183e      jr      #1b5a           ; (62)
1b1c  2a55f3    ld      hl,(#f355)
1b1f  225df3    ld      (#f35d),hl
1b22  7e        ld      a,(hl)
1b23  fe50      cp      #50
1b25  200c      jr      nz,#1b33        ; (12)
1b27  2e50      ld      l,#50
1b29  cd40a8    call    #a840
1b2c  182c      jr      #1b5a           ; (44)
1b2e  cd6f73    call    #736f
1b31  1827      jr      #1b5a           ; (39)
1b33  2a55f3    ld      hl,(#f355)
1b36  cd0b9c    call    #9c0b
1b39  69        ld      l,c
1b3a  60        ld      h,b
1b3b  2255f3    ld      (#f355),hl
1b3e  2e00      ld      l,#00
1b40  e5        push    hl
1b41  2a55f3    ld      hl,(#f355)
1b44  ed4b5df3  ld      bc,(#f35d)
1b48  7d        ld      a,l
1b49  91        sub     c
1b4a  6f        ld      l,a
1b4b  7c        ld      a,h
1b4c  98        sbc     a,b
1b4d  67        ld      h,a
1b4e  e5        push    hl
1b4f  2a5df3    ld      hl,(#f35d)
1b52  cd929e    call    #9e92
1b55  69        ld      l,c
1b56  60        ld      h,b
1b57  cd53b3    call    #b353
1b5a  c372be    jp      #be72
1b5d  f7        rst     #30
1b5e  2a5df3    ld      hl,(#f35d)
1b61  7e        ld      a,(hl)
1b62  fe53      cp      #53
1b64  200c      jr      nz,#1b72        ; (12)
1b66  3a25f1    ld      a,(#f125)
1b69  b7        or      a
1b6a  2006      jr      nz,#1b72        ; (6)
1b6c  cd6f73    call    #736f
1b6f  c3b95b    jp      #5bb9
1b72  3a25f1    ld      a,(#f125)
1b75  b7        or      a
1b76  2808      jr      z,#1b80         ; (8)
1b78  2a5df3    ld      hl,(#f35d)
1b7b  7e        ld      a,(hl)
1b7c  fe50      cp      #50
1b7e  200e      jr      nz,#1b8e        ; (14)
1b80  2a5df3    ld      hl,(#f35d)
1b83  2255f3    ld      (#f355),hl
1b86  cd5f9b    call    #9b5f
1b89  69        ld      l,c
1b8a  60        ld      h,b
1b8b  225df3    ld      (#f35d),hl
1b8e  2a5df3    ld      hl,(#f35d)
1b91  7e        ld      a,(hl)
1b92  fe53      cp      #53
1b94  2007      jr      nz,#1b9d        ; (7)
1b96  2e53      ld      l,#53
1b98  cd40a8    call    #a840
1b9b  181c      jr      #1bb9           ; (28)
1b9d  2e00      ld      l,#00
1b9f  e5        push    hl
1ba0  2a55f3    ld      hl,(#f355)
1ba3  ed4b5df3  ld      bc,(#f35d)
1ba7  7d        ld      a,l
1ba8  91        sub     c
1ba9  6f        ld      l,a
1baa  7c        ld      a,h
1bab  98        sbc     a,b
1bac  67        ld      h,a
1bad  e5        push    hl
1bae  2a5df3    ld      hl,(#f35d)
1bb1  cd929e    call    #9e92
1bb4  69        ld      l,c
1bb5  60        ld      h,b
1bb6  cd53b3    call    #b353
1bb9  97        sub     a
1bba  3225f1    ld      (#f125),a
1bbd  c372be    jp      #be72
1bc0  4d        ld      c,l
1bc1  49        ld      c,c
1bc2  53        ld      d,e
1bc3  53        ld      d,e
1bc4  49        ld      c,c
1bc5  4e        ld      c,(hl)
1bc6  47        ld      b,a
1bc7  204c      jr      nz,#1c15        ; (76)
1bc9  41        ld      b,c
1bca  42        ld      b,d
1bcb  45        ld      b,l
1bcc  4c        ld      c,h
1bcd  2000      jr      nz,#1bcf        ; (0)
1bcf  44        ld      b,h
1bd0  55        ld      d,l
1bd1  50        ld      d,b
1bd2  4c        ld      c,h
1bd3  49        ld      c,c
1bd4  43        ld      b,e
1bd5  41        ld      b,c
1bd6  54        ld      d,h
1bd7  45        ld      b,l
1bd8  204c      jr      nz,#1c26        ; (76)
1bda  41        ld      b,c
1bdb  42        ld      b,d
1bdc  45        ld      b,l
1bdd  4c        ld      c,h
1bde  2000      jr      nz,#1be0        ; (0)
1be0  f7        rst     #30
1be1  21caff    ld      hl,#ffca
1be4  39        add     hl,sp
1be5  f9        ld      sp,hl
1be6  2e58      ld      l,#58
1be8  cf        rst     #8
1be9  212000    ld      hl,#0020
1bec  e5        push    hl
1bed  dde5      push    ix
1bef  c1        pop     bc
1bf0  21d6ff    ld      hl,#ffd6
1bf3  09        add     hl,bc
1bf4  cdc3b8    call    #b8c3
1bf7  2a4df3    ld      hl,(#f34d)
1bfa  362b      ld      (hl),#2b
1bfc  3a2af4    ld      a,(#f42a)
1bff  dd77ce    ld      (ix-#32),a
1c02  3a2bf4    ld      a,(#f42b)
1c05  dd77cf    ld      (ix-#31),a
1c08  2e2b      ld      l,#2b
1c0a  e5        push    hl
1c0b  dd6ece    ld      l,(ix-#32)
1c0e  dd66cf    ld      h,(ix-#31)
1c11  cd6ab6    call    #b66a
1c14  dd71ce    ld      (ix-#32),c
1c17  dd70cf    ld      (ix-#31),b
1c1a  214df3    ld      hl,#f34d
1c1d  dd7ece    ld      a,(ix-#32)
1c20  be        cp      (hl)
1c21  2005      jr      nz,#1c28        ; (5)
1c23  dd7ecf    ld      a,(ix-#31)
1c26  23        inc     hl
1c27  be        cp      (hl)
1c28  ca7b5c    jp      z,#5c7b
1c2b  dd6ece    ld      l,(ix-#32)
1c2e  dd66cf    ld      h,(ix-#31)
1c31  23        inc     hl
1c32  7e        ld      a,(hl)
1c33  dd77f7    ld      (ix-#09),a
1c36  dd7ef7    ld      a,(ix-#09)
1c39  4f        ld      c,a
1c3a  87        add     a,a
1c3b  9f        sbc     a,a
1c3c  47        ld      b,a
1c3d  69        ld      l,c
1c3e  60        ld      h,b
1c3f  29        add     hl,hl
1c40  e5        push    hl
1c41  dde5      push    ix
1c43  c1        pop     bc
1c44  21d6ff    ld      hl,#ffd6
1c47  09        add     hl,bc
1c48  e3        ex      (sp),hl
1c49  c1        pop     bc
1c4a  09        add     hl,bc
1c4b  7e        ld      a,(hl)
1c4c  23        inc     hl
1c4d  b6        or      (hl)
1c4e  ca005d    jp      z,#5d00
1c51  21cf5b    ld      hl,#5bcf
1c54  ef        rst     #28
1c55  dd6ef7    ld      l,(ix-#09)
1c58  d7        rst     #10
1c59  dd6ece    ld      l,(ix-#32)
1c5c  dd66cf    ld      h,(ix-#31)
1c5f  cd5f9b    call    #9b5f
1c62  69        ld      l,c
1c63  60        ld      h,b
1c64  225df3    ld      (#f35d),hl
1c67  dd6ece    ld      l,(ix-#32)
1c6a  dd66cf    ld      h,(ix-#31)
1c6d  2255f3    ld      (#f355),hl
1c70  2a4df3    ld      hl,(#f34d)
1c73  3650      ld      (hl),#50
1c75  cdcaaa    call    #aaca
1c78  c372be    jp      #be72
1c7b  2a4df3    ld      hl,(#f34d)
1c7e  362c      ld      (hl),#2c
1c80  3a2af4    ld      a,(#f42a)
1c83  dd77ce    ld      (ix-#32),a
1c86  3a2bf4    ld      a,(#f42b)
1c89  dd77cf    ld      (ix-#31),a
1c8c  2e2c      ld      l,#2c
1c8e  e5        push    hl
1c8f  dd6ece    ld      l,(ix-#32)
1c92  dd66cf    ld      h,(ix-#31)
1c95  cd6ab6    call    #b66a
1c98  dd71ce    ld      (ix-#32),c
1c9b  dd70cf    ld      (ix-#31),b
1c9e  214df3    ld      hl,#f34d
1ca1  dd7ece    ld      a,(ix-#32)
1ca4  be        cp      (hl)
1ca5  2005      jr      nz,#1cac        ; (5)
1ca7  dd7ecf    ld      a,(ix-#31)
1caa  23        inc     hl
1cab  be        cp      (hl)
1cac  ca3b5d    jp      z,#5d3b
1caf  dd6ece    ld      l,(ix-#32)
1cb2  dd66cf    ld      h,(ix-#31)
1cb5  23        inc     hl
1cb6  7e        ld      a,(hl)
1cb7  dd77f7    ld      (ix-#09),a
1cba  dd7ef7    ld      a,(ix-#09)
1cbd  4f        ld      c,a
1cbe  87        add     a,a
1cbf  9f        sbc     a,a
1cc0  47        ld      b,a
1cc1  69        ld      l,c
1cc2  60        ld      h,b
1cc3  29        add     hl,hl
1cc4  e5        push    hl
1cc5  dde5      push    ix
1cc7  c1        pop     bc
1cc8  21d6ff    ld      hl,#ffd6
1ccb  09        add     hl,bc
1ccc  e3        ex      (sp),hl
1ccd  c1        pop     bc
1cce  09        add     hl,bc
1ccf  7e        ld      a,(hl)
1cd0  23        inc     hl
1cd1  b6        or      (hl)
1cd2  c2cc5d    jp      nz,#5dcc
1cd5  21c05b    ld      hl,#5bc0
1cd8  ef        rst     #28
1cd9  dd6ef7    ld      l,(ix-#09)
1cdc  d7        rst     #10
1cdd  dd6ece    ld      l,(ix-#32)
1ce0  dd66cf    ld      h,(ix-#31)
1ce3  23        inc     hl
1ce4  23        inc     hl
1ce5  cd5f9b    call    #9b5f
1ce8  69        ld      l,c
1ce9  60        ld      h,b
1cea  2255f3    ld      (#f355),hl
1ced  cd5f9b    call    #9b5f
1cf0  69        ld      l,c
1cf1  60        ld      h,b
1cf2  225df3    ld      (#f35d),hl
1cf5  2a4df3    ld      hl,(#f34d)
1cf8  3650      ld      (hl),#50
1cfa  cdcaaa    call    #aaca
1cfd  c372be    jp      #be72
1d00  dd7ef7    ld      a,(ix-#09)
1d03  4f        ld      c,a
1d04  87        add     a,a
1d05  9f        sbc     a,a
1d06  47        ld      b,a
1d07  69        ld      l,c
1d08  60        ld      h,b
1d09  29        add     hl,hl
1d0a  e5        push    hl
1d0b  dde5      push    ix
1d0d  c1        pop     bc
1d0e  21d6ff    ld      hl,#ffd6
1d11  09        add     hl,bc
1d12  e3        ex      (sp),hl
1d13  c1        pop     bc
1d14  09        add     hl,bc
1d15  dd4ece    ld      c,(ix-#32)
1d18  dd46cf    ld      b,(ix-#31)
1d1b  ed5b2af4  ld      de,(#f42a)
1d1f  79        ld      a,c
1d20  93        sub     e
1d21  4f        ld      c,a
1d22  78        ld      a,b
1d23  9a        sbc     a,d
1d24  47        ld      b,a
1d25  03        inc     bc
1d26  03        inc     bc
1d27  71        ld      (hl),c
1d28  23        inc     hl
1d29  70        ld      (hl),b
1d2a  dd6ece    ld      l,(ix-#32)
1d2d  dd66cf    ld      h,(ix-#31)
1d30  23        inc     hl
1d31  23        inc     hl
1d32  dd75ce    ld      (ix-#32),l
1d35  dd74cf    ld      (ix-#31),h
1d38  c3085c    jp      #5c08
1d3b  2a4df3    ld      hl,(#f34d)
1d3e  3650      ld      (hl),#50
1d40  2a4df3    ld      hl,(#f34d)
1d43  23        inc     hl
1d44  dd75d2    ld      (ix-#2e),l
1d47  dd74d3    ld      (ix-#2d),h
1d4a  dd36d500  ld      (ix-#2b),#00
1d4e  dd36f900  ld      (ix-#07),#00
1d52  dd7ef9    ld      a,(ix-#07)
1d55  fe10      cp      #10
1d57  f2dd5d    jp      p,#5ddd
1d5a  dd7ef9    ld      a,(ix-#07)
1d5d  4f        ld      c,a
1d5e  87        add     a,a
1d5f  9f        sbc     a,a
1d60  47        ld      b,a
1d61  69        ld      l,c
1d62  60        ld      h,b
1d63  29        add     hl,hl
1d64  e5        push    hl
1d65  dde5      push    ix
1d67  c1        pop     bc
1d68  21d6ff    ld      hl,#ffd6
1d6b  09        add     hl,bc
1d6c  e3        ex      (sp),hl
1d6d  c1        pop     bc
1d6e  09        add     hl,bc
1d6f  7e        ld      a,(hl)
1d70  dd77ca    ld      (ix-#36),a
1d73  23        inc     hl
1d74  7e        ld      a,(hl)
1d75  dd77cb    ld      (ix-#35),a
1d78  dd7eca    ld      a,(ix-#36)
1d7b  ddb6cb    or      (ix-#35)
1d7e  ca465e    jp      z,#5e46
1d81  dd34d5    inc     (ix-#2b)
1d84  dd6ed2    ld      l,(ix-#2e)
1d87  dd66d3    ld      h,(ix-#2d)
1d8a  dd34d2    inc     (ix-#2e)
1d8d  2003      jr      nz,#1d92        ; (3)
1d8f  dd34d3    inc     (ix-#2d)
1d92  dd7ef9    ld      a,(ix-#07)
1d95  77        ld      (hl),a
1d96  dd6ed2    ld      l,(ix-#2e)
1d99  dd66d3    ld      h,(ix-#2d)
1d9c  dd34d2    inc     (ix-#2e)
1d9f  2003      jr      nz,#1da4        ; (3)
1da1  dd34d3    inc     (ix-#2d)
1da4  dd7eca    ld      a,(ix-#36)
1da7  77        ld      (hl),a
1da8  dd6ed2    ld      l,(ix-#2e)
1dab  dd66d3    ld      h,(ix-#2d)
1dae  dd34d2    inc     (ix-#2e)
1db1  2003      jr      nz,#1db6        ; (3)
1db3  dd34d3    inc     (ix-#2d)
1db6  e5        push    hl
1db7  dd6eca    ld      l,(ix-#36)
1dba  dd66cb    ld      h,(ix-#35)
1dbd  e5        push    hl
1dbe  210800    ld      hl,#0008
1dc1  e5        push    hl
1dc2  cd01ba    call    #ba01
1dc5  e1        pop     hl
1dc6  c1        pop     bc
1dc7  7d        ld      a,l
1dc8  02        ld      (bc),a
1dc9  c3465e    jp      #5e46
1dcc  dd6ece    ld      l,(ix-#32)
1dcf  dd66cf    ld      h,(ix-#31)
1dd2  23        inc     hl
1dd3  23        inc     hl
1dd4  dd75ce    ld      (ix-#32),l
1dd7  dd74cf    ld      (ix-#31),h
1dda  c38c5c    jp      #5c8c
1ddd  dd6ed2    ld      l,(ix-#2e)
1de0  dd66d3    ld      h,(ix-#2d)
1de3  e5        push    hl
1de4  21ffe7    ld      hl,#e7ff
1de7  e5        push    hl
1de8  2a5bf3    ld      hl,(#f35b)
1deb  cdd79a    call    #9ad7
1dee  dd6ed2    ld      l,(ix-#2e)
1df1  dd66d3    ld      h,(ix-#2d)
1df4  ed4b57f3  ld      bc,(#f357)
1df8  7d        ld      a,l
1df9  91        sub     c
1dfa  6f        ld      l,a
1dfb  7c        ld      a,h
1dfc  98        sbc     a,b
1dfd  67        ld      h,a
1dfe  01ffff    ld      bc,#ffff
1e01  09        add     hl,bc
1e02  dd75d0    ld      (ix-#30),l
1e05  dd74d1    ld      (ix-#2f),h
1e08  3a29f4    ld      a,(#f429)
1e0b  3c        inc     a
1e0c  6f        ld      l,a
1e0d  dd75f9    ld      (ix-#07),l
1e10  dd7ef9    ld      a,(ix-#07)
1e13  fe64      cp      #64
1e15  f24c5e    jp      p,#5e4c
1e18  dd7ef9    ld      a,(ix-#07)
1e1b  4f        ld      c,a
1e1c  87        add     a,a
1e1d  9f        sbc     a,a
1e1e  47        ld      b,a
1e1f  69        ld      l,c
1e20  60        ld      h,b
1e21  29        add     hl,hl
1e22  015ff3    ld      bc,#f35f
1e25  09        add     hl,bc
1e26  7e        ld      a,(hl)
1e27  23        inc     hl
1e28  b6        or      (hl)
1e29  2839      jr      z,#1e64         ; (57)
1e2b  dd7ef9    ld      a,(ix-#07)
1e2e  4f        ld      c,a
1e2f  87        add     a,a
1e30  9f        sbc     a,a
1e31  47        ld      b,a
1e32  69        ld      l,c
1e33  60        ld      h,b
1e34  29        add     hl,hl
1e35  015ff3    ld      bc,#f35f
1e38  09        add     hl,bc
1e39  7e        ld      a,(hl)
1e3a  dd86d0    add     a,(ix-#30)
1e3d  77        ld      (hl),a
1e3e  23        inc     hl
1e3f  7e        ld      a,(hl)
1e40  dd8ed1    adc     a,(ix-#2f)
1e43  77        ld      (hl),a
1e44  181e      jr      #1e64           ; (30)
1e46  dd34f9    inc     (ix-#07)
1e49  c3525d    jp      #5d52
1e4c  2a4ff3    ld      hl,(#f34f)
1e4f  dd4ed0    ld      c,(ix-#30)
1e52  dd46d1    ld      b,(ix-#2f)
1e55  09        add     hl,bc
1e56  224ff3    ld      (#f34f),hl
1e59  2227f4    ld      (#f427),hl
1e5c  2e4d      ld      l,#4d
1e5e  cd1dab    call    #ab1d
1e61  c372be    jp      #be72
1e64  dd34f9    inc     (ix-#07)
1e67  c3105e    jp      #5e10
1e6a  f7        rst     #30
1e6b  21f6ff    ld      hl,#fff6
1e6e  39        add     hl,sp
1e6f  f9        ld      sp,hl
1e70  2e71      ld      l,#71
1e72  cf        rst     #8
1e73  2e58      ld      l,#58
1e75  cf        rst     #8
1e76  2e10      ld      l,#10
1e78  d7        rst     #10
1e79  2e72      ld      l,#72
1e7b  cf        rst     #8
1e7c  2e00      ld      l,#00
1e7e  cdcda3    call    #a3cd
1e81  dd71f9    ld      (ix-#07),c
1e84  dd7ef9    ld      a,(ix-#07)
1e87  b7        or      a
1e88  ca3d5f    jp      z,#5f3d
1e8b  3a40f1    ld      a,(#f140)
1e8e  fe02      cp      #02
1e90  2006      jr      nz,#1e98        ; (6)
1e92  cd229a    call    #9a22
1e95  c372be    jp      #be72
1e98  97        sub     a
1e99  32a0f1    ld      (#f1a0),a
1e9c  2e00      ld      l,#00
1e9e  cd7f94    call    #947f
1ea1  dd71f6    ld      (ix-#0a),c
1ea4  dd7ef6    ld      a,(ix-#0a)
1ea7  fe02      cp      #02
1ea9  ca3d5f    jp      z,#5f3d
1eac  dd7ef9    ld      a,(ix-#07)
1eaf  fe01      cp      #01
1eb1  2014      jr      nz,#1ec7        ; (20)
1eb3  2e63      ld      l,#63
1eb5  d7        rst     #10
1eb6  cdbb65    call    #65bb
1eb9  dd71f7    ld      (ix-#09),c
1ebc  dd7ef7    ld      a,(ix-#09)
1ebf  fe02      cp      #02
1ec1  c21a5f    jp      nz,#5f1a
1ec4  c33d5f    jp      #5f3d
1ec7  dd36f600  ld      (ix-#0a),#00
1ecb  97        sub     a
1ecc  323ef1    ld      (#f13e),a
1ecf  dd36f800  ld      (ix-#08),#00
1ed3  213ff1    ld      hl,#f13f
1ed6  dd7ef8    ld      a,(ix-#08)
1ed9  be        cp      (hl)
1eda  f2475f    jp      p,#5f47
1edd  2139f1    ld      hl,#f139
1ee0  e5        push    hl
1ee1  dd7ef8    ld      a,(ix-#08)
1ee4  4f        ld      c,a
1ee5  87        add     a,a
1ee6  9f        sbc     a,a
1ee7  47        ld      b,a
1ee8  69        ld      l,c
1ee9  60        ld      h,b
1eea  29        add     hl,hl
1eeb  29        add     hl,hl
1eec  29        add     hl,hl
1eed  016ae9    ld      bc,#e96a
1ef0  09        add     hl,bc
1ef1  e5        push    hl
1ef2  df        rst     #18
1ef3  f1        pop     af
1ef4  2121f1    ld      hl,#f121
1ef7  e5        push    hl
1ef8  dd7ef8    ld      a,(ix-#08)
1efb  4f        ld      c,a
1efc  87        add     a,a
1efd  9f        sbc     a,a
1efe  47        ld      b,a
1eff  69        ld      l,c
1f00  60        ld      h,b
1f01  29        add     hl,hl
1f02  29        add     hl,hl
1f03  29        add     hl,hl
1f04  016ee9    ld      bc,#e96e
1f07  09        add     hl,bc
1f08  e5        push    hl
1f09  df        rst     #18
1f0a  f1        pop     af
1f0b  cdbb65    call    #65bb
1f0e  dd71f7    ld      (ix-#09),c
1f11  dd7ef7    ld      a,(ix-#09)
1f14  fe02      cp      #02
1f16  2013      jr      nz,#1f2b        ; (19)
1f18  1823      jr      #1f3d           ; (35)
1f1a  dd7ef6    ld      a,(ix-#0a)
1f1d  ddb6f7    or      (ix-#09)
1f20  dd77f6    ld      (ix-#0a),a
1f23  1822      jr      #1f47           ; (34)
1f25  dd34f8    inc     (ix-#08)
1f28  c3d35e    jp      #5ed3
1f2b  dd7ef6    ld      a,(ix-#0a)
1f2e  ddb6f7    or      (ix-#09)
1f31  dd77f6    ld      (ix-#0a),a
1f34  2e00      ld      l,#00
1f36  cd7c76    call    #767c
1f39  79        ld      a,c
1f3a  b7        or      a
1f3b  28e8      jr      z,#1f25         ; (-24)
1f3d  3e01      ld      a,#01
1f3f  32a0f1    ld      (#f1a0),a
1f42  0e02      ld      c,#02
1f44  c372be    jp      #be72
1f47  dd7ef6    ld      a,(ix-#0a)
1f4a  b7        or      a
1f4b  2004      jr      nz,#1f51        ; (4)
1f4d  0e66      ld      c,#66
1f4f  1802      jr      #1f53           ; (2)
1f51  0e69      ld      c,#69
1f53  69        ld      l,c
1f54  d7        rst     #10
1f55  3e01      ld      a,#01
1f57  32a0f1    ld      (#f1a0),a
1f5a  dd4ef6    ld      c,(ix-#0a)
1f5d  c372be    jp      #be72
1f60  e7        rst     #20
1f61  21f6f4    ld      hl,#f4f6
1f64  e5        push    hl
1f65  dd6e08    ld      l,(ix+#08)
1f68  dd6609    ld      h,(ix+#09)
1f6b  4e        ld      c,(hl)
1f6c  23        inc     hl
1f6d  46        ld      b,(hl)
1f6e  c5        push    bc
1f6f  211200    ld      hl,#0012
1f72  e5        push    hl
1f73  cd2dba    call    #ba2d
1f76  e1        pop     hl
1f77  01aee9    ld      bc,#e9ae
1f7a  09        add     hl,bc
1f7b  e5        push    hl
1f7c  df        rst     #18
1f7d  f1        pop     af
1f7e  21faf4    ld      hl,#f4fa
1f81  e5        push    hl
1f82  dd6e08    ld      l,(ix+#08)
1f85  dd6609    ld      h,(ix+#09)
1f88  4e        ld      c,(hl)
1f89  23        inc     hl
1f8a  46        ld      b,(hl)
1f8b  c5        push    bc
1f8c  211200    ld      hl,#0012
1f8f  e5        push    hl
1f90  cd2dba    call    #ba2d
1f93  e1        pop     hl
1f94  01b2e9    ld      bc,#e9b2
1f97  09        add     hl,bc
1f98  e5        push    hl
1f99  df        rst     #18
1f9a  f1        pop     af
1f9b  21f6f4    ld      hl,#f4f6
1f9e  e5        push    hl
1f9f  dd6e04    ld      l,(ix+#04)
1fa2  dd6605    ld      h,(ix+#05)
1fa5  e5        push    hl
1fa6  cdb0ba    call    #bab0
1fa9  302f      jr      nc,#1fda        ; (47)
1fab  21faf4    ld      hl,#f4fa
1fae  e5        push    hl
1faf  dd6e04    ld      l,(ix+#04)
1fb2  dd6605    ld      h,(ix+#05)
1fb5  e5        push    hl
1fb6  cdb0ba    call    #bab0
1fb9  da5061    jp      c,#6150
1fbc  dd6e06    ld      l,(ix+#06)
1fbf  dd6607    ld      h,(ix+#07)
1fc2  e5        push    hl
1fc3  21faf4    ld      hl,#f4fa
1fc6  e5        push    hl
1fc7  cdb0ba    call    #bab0
1fca  d23e60    jp      nc,#603e
1fcd  3a3ef1    ld      a,(#f13e)
1fd0  fe63      cp      #63
1fd2  fa8060    jp      m,#6080
1fd5  0e01      ld      c,#01
1fd7  c393be    jp      #be93
1fda  dd6e06    ld      l,(ix+#06)
1fdd  dd6607    ld      h,(ix+#07)
1fe0  e5        push    hl
1fe1  21f6f4    ld      hl,#f4f6
1fe4  e5        push    hl
1fe5  cdb0ba    call    #bab0
1fe8  da5061    jp      c,#6150
1feb  dd6e06    ld      l,(ix+#06)
1fee  dd6607    ld      h,(ix+#07)
1ff1  e5        push    hl
1ff2  21faf4    ld      hl,#f4fa
1ff5  e5        push    hl
1ff6  cdb0ba    call    #bab0
1ff9  d25561    jp      nc,#6155
1ffc  dd6e08    ld      l,(ix+#08)
1fff  dd6609    ld      h,(ix+#09)
2002  4e        ld      c,(hl)
2003  23        inc     hl
2004  46        ld      b,(hl)
2005  c5        push    bc
2006  211200    ld      hl,#0012
2009  e5        push    hl
200a  cd2dba    call    #ba2d
200d  e1        pop     hl
200e  01aee9    ld      bc,#e9ae
2011  09        add     hl,bc
2012  e5        push    hl
2013  dd6e06    ld      l,(ix+#06)
2016  dd6607    ld      h,(ix+#07)
2019  1135f9    ld      de,#f935
201c  ff        rst     #38
201d  2135f9    ld      hl,#f935
2020  e5        push    hl
2021  3ab6f0    ld      a,(#f0b6)
2024  323ff9    ld      (#f93f),a
2027  87        add     a,a
2028  9f        sbc     a,a
2029  3240f9    ld      (#f940),a
202c  323ef9    ld      (#f93e),a
202f  323df9    ld      (#f93d),a
2032  213df9    ld      hl,#f93d
2035  e5        push    hl
2036  cd62ba    call    #ba62
2039  df        rst     #18
203a  f1        pop     af
203b  c35061    jp      #6150
203e  dd6e08    ld      l,(ix+#08)
2041  dd6609    ld      h,(ix+#09)
2044  4e        ld      c,(hl)
2045  23        inc     hl
2046  46        ld      b,(hl)
2047  c5        push    bc
2048  211200    ld      hl,#0012
204b  e5        push    hl
204c  cd2dba    call    #ba2d
204f  e1        pop     hl
2050  01b2e9    ld      bc,#e9b2
2053  09        add     hl,bc
2054  e5        push    hl
2055  dd6e04    ld      l,(ix+#04)
2058  dd6605    ld      h,(ix+#05)
205b  1135f9    ld      de,#f935
205e  ff        rst     #38
205f  2135f9    ld      hl,#f935
2062  e5        push    hl
2063  3ab6f0    ld      a,(#f0b6)
2066  323ff9    ld      (#f93f),a
2069  87        add     a,a
206a  9f        sbc     a,a
206b  3240f9    ld      (#f940),a
206e  323ef9    ld      (#f93e),a
2071  323df9    ld      (#f93d),a
2074  213df9    ld      hl,#f93d
2077  e5        push    hl
2078  cdf7bd    call    #bdf7
207b  df        rst     #18
207c  f1        pop     af
207d  c35061    jp      #6150
2080  dd6e08    ld      l,(ix+#08)
2083  dd6609    ld      h,(ix+#09)
2086  4e        ld      c,(hl)
2087  23        inc     hl
2088  46        ld      b,(hl)
2089  c5        push    bc
208a  211200    ld      hl,#0012
208d  e5        push    hl
208e  cd2dba    call    #ba2d
2091  e1        pop     hl
2092  01aee9    ld      bc,#e9ae
2095  09        add     hl,bc
2096  22fef4    ld      (#f4fe),hl
2099  011200    ld      bc,#0012
209c  09        add     hl,bc
209d  e5        push    hl
209e  3a3ef1    ld      a,(#f13e)
20a1  6f        ld      l,a
20a2  3a3ef1    ld      a,(#f13e)
20a5  c601      add     a,#01
20a7  323ef1    ld      (#f13e),a
20aa  7d        ld      a,l
20ab  4f        ld      c,a
20ac  87        add     a,a
20ad  9f        sbc     a,a
20ae  47        ld      b,a
20af  c5        push    bc
20b0  211200    ld      hl,#0012
20b3  e5        push    hl
20b4  cd2dba    call    #ba2d
20b7  e1        pop     hl
20b8  01aee9    ld      bc,#e9ae
20bb  09        add     hl,bc
20bc  01ffff    ld      bc,#ffff
20bf  09        add     hl,bc
20c0  e5        push    hl
20c1  2afef4    ld      hl,(#f4fe)
20c4  cdd79a    call    #9ad7
20c7  dd6e08    ld      l,(ix+#08)
20ca  dd6609    ld      h,(ix+#09)
20cd  4e        ld      c,(hl)
20ce  23        inc     hl
20cf  46        ld      b,(hl)
20d0  c5        push    bc
20d1  dd6e08    ld      l,(ix+#08)
20d4  dd6609    ld      h,(ix+#09)
20d7  34        inc     (hl)
20d8  2002      jr      nz,#20dc        ; (2)
20da  23        inc     hl
20db  34        inc     (hl)
20dc  211200    ld      hl,#0012
20df  e5        push    hl
20e0  cd2dba    call    #ba2d
20e3  e1        pop     hl
20e4  01b2e9    ld      bc,#e9b2
20e7  09        add     hl,bc
20e8  e5        push    hl
20e9  dd6e04    ld      l,(ix+#04)
20ec  dd6605    ld      h,(ix+#05)
20ef  1135f9    ld      de,#f935
20f2  ff        rst     #38
20f3  2135f9    ld      hl,#f935
20f6  e5        push    hl
20f7  3ab6f0    ld      a,(#f0b6)
20fa  323ff9    ld      (#f93f),a
20fd  87        add     a,a
20fe  9f        sbc     a,a
20ff  3240f9    ld      (#f940),a
2102  323ef9    ld      (#f93e),a
2105  323df9    ld      (#f93d),a
2108  213df9    ld      hl,#f93d
210b  e5        push    hl
210c  cdf7bd    call    #bdf7
210f  df        rst     #18
2110  f1        pop     af
2111  dd6e08    ld      l,(ix+#08)
2114  dd6609    ld      h,(ix+#09)
2117  4e        ld      c,(hl)
2118  23        inc     hl
2119  46        ld      b,(hl)
211a  c5        push    bc
211b  211200    ld      hl,#0012
211e  e5        push    hl
211f  cd2dba    call    #ba2d
2122  e1        pop     hl
2123  01aee9    ld      bc,#e9ae
2126  09        add     hl,bc
2127  e5        push    hl
2128  dd6e06    ld      l,(ix+#06)
212b  dd6607    ld      h,(ix+#07)
212e  1135f9    ld      de,#f935
2131  ff        rst     #38
2132  2135f9    ld      hl,#f935
2135  e5        push    hl
2136  3ab6f0    ld      a,(#f0b6)
2139  323ff9    ld      (#f93f),a
213c  87        add     a,a
213d  9f        sbc     a,a
213e  3240f9    ld      (#f940),a
2141  323ef9    ld      (#f93e),a
2144  323df9    ld      (#f93d),a
2147  213df9    ld      hl,#f93d
214a  e5        push    hl
214b  cd62ba    call    #ba62
214e  df        rst     #18
214f  f1        pop     af
2150  0e00      ld      c,#00
2152  c393be    jp      #be93
2155  dd6e08    ld      l,(ix+#08)
2158  dd6609    ld      h,(ix+#09)
215b  4e        ld      c,(hl)
215c  23        inc     hl
215d  46        ld      b,(hl)
215e  c5        push    bc
215f  211200    ld      hl,#0012
2162  e5        push    hl
2163  cd2dba    call    #ba2d
2166  e1        pop     hl
2167  01aee9    ld      bc,#e9ae
216a  09        add     hl,bc
216b  22fef4    ld      (#f4fe),hl
216e  e5        push    hl
216f  3a3ef1    ld      a,(#f13e)
2172  6f        ld      l,a
2173  3a3ef1    ld      a,(#f13e)
2176  d601      sub     #01
2178  323ef1    ld      (#f13e),a
217b  7d        ld      a,l
217c  4f        ld      c,a
217d  87        add     a,a
217e  9f        sbc     a,a
217f  47        ld      b,a
2180  c5        push    bc
2181  211200    ld      hl,#0012
2184  e5        push    hl
2185  cd2dba    call    #ba2d
2188  e1        pop     hl
2189  01aee9    ld      bc,#e9ae
218c  09        add     hl,bc
218d  01ffff    ld      bc,#ffff
2190  09        add     hl,bc
2191  e5        push    hl
2192  2afef4    ld      hl,(#f4fe)
2195  011200    ld      bc,#0012
2198  09        add     hl,bc
2199  cdd79a    call    #9ad7
219c  dd6e08    ld      l,(ix+#08)
219f  dd6609    ld      h,(ix+#09)
21a2  7e        ld      a,(hl)
21a3  d601      sub     #01
21a5  77        ld      (hl),a
21a6  23        inc     hl
21a7  7e        ld      a,(hl)
21a8  de00      sbc     a,#00
21aa  77        ld      (hl),a
21ab  c35061    jp      #6150
21ae  e7        rst     #20
21af  2100f5    ld      hl,#f500
21b2  e5        push    hl
21b3  dd6e06    ld      l,(ix+#06)
21b6  dd6607    ld      h,(ix+#07)
21b9  010a00    ld      bc,#000a
21bc  09        add     hl,bc
21bd  1135f9    ld      de,#f935
21c0  ff        rst     #38
21c1  2135f9    ld      hl,#f935
21c4  e5        push    hl
21c5  cd03bb    call    #bb03
21c8  df        rst     #18
21c9  f1        pop     af
21ca  dd6e04    ld      l,(ix+#04)
21cd  dd6605    ld      h,(ix+#05)
21d0  010a00    ld      bc,#000a
21d3  09        add     hl,bc
21d4  1135f9    ld      de,#f935
21d7  ff        rst     #38
21d8  2135f9    ld      hl,#f935
21db  e5        push    hl
21dc  2100f5    ld      hl,#f500
21df  e5        push    hl
21e0  cd8dba    call    #ba8d
21e3  e1        pop     hl
21e4  7e        ld      a,(hl)
21e5  23        inc     hl
21e6  b6        or      (hl)
21e7  23        inc     hl
21e8  b6        or      (hl)
21e9  23        inc     hl
21ea  b6        or      (hl)
21eb  c23c62    jp      nz,#623c
21ee  dd6e06    ld      l,(ix+#06)
21f1  dd6607    ld      h,(ix+#07)
21f4  e5        push    hl
21f5  dd6e04    ld      l,(ix+#04)
21f8  dd6605    ld      h,(ix+#05)
21fb  1135f9    ld      de,#f935
21fe  ff        rst     #38
21ff  2135f9    ld      hl,#f935
2202  e5        push    hl
2203  2100f5    ld      hl,#f500
2206  e5        push    hl
2207  cd8dba    call    #ba8d
220a  cdb0ba    call    #bab0
220d  382d      jr      c,#223c         ; (45)
220f  dd6e04    ld      l,(ix+#04)
2212  dd6605    ld      h,(ix+#05)
2215  23        inc     hl
2216  23        inc     hl
2217  23        inc     hl
2218  23        inc     hl
2219  1135f9    ld      de,#f935
221c  ff        rst     #38
221d  2135f9    ld      hl,#f935
2220  e5        push    hl
2221  2100f5    ld      hl,#f500
2224  e5        push    hl
2225  cd8dba    call    #ba8d
2228  dd6e06    ld      l,(ix+#06)
222b  dd6607    ld      h,(ix+#07)
222e  23        inc     hl
222f  23        inc     hl
2230  23        inc     hl
2231  23        inc     hl
2232  e5        push    hl
2233  cdb0ba    call    #bab0
2236  3804      jr      c,#223c         ; (4)
2238  0e01      ld      c,#01
223a  1802      jr      #223e           ; (2)
223c  0e00      ld      c,#00
223e  c38bbe    jp      #be8b
2241  e7        rst     #20
2242  dd6e06    ld      l,(ix+#06)
2245  dd6607    ld      h,(ix+#07)
2248  23        inc     hl
2249  23        inc     hl
224a  23        inc     hl
224b  23        inc     hl
224c  1135f9    ld      de,#f935
224f  ff        rst     #38
2250  2135f9    ld      hl,#f935
2253  e5        push    hl
2254  3ab6f0    ld      a,(#f0b6)
2257  323ff9    ld      (#f93f),a
225a  87        add     a,a
225b  9f        sbc     a,a
225c  3240f9    ld      (#f940),a
225f  323ef9    ld      (#f93e),a
2262  323df9    ld      (#f93d),a
2265  213df9    ld      hl,#f93d
2268  e5        push    hl
2269  cd62ba    call    #ba62
226c  dd6e04    ld      l,(ix+#04)
226f  dd6605    ld      h,(ix+#05)
2272  e5        push    hl
2273  cdd9ba    call    #bad9
2276  c2cd62    jp      nz,#62cd
2279  dd6e04    ld      l,(ix+#04)
227c  dd6605    ld      h,(ix+#05)
227f  010800    ld      bc,#0008
2282  09        add     hl,bc
2283  e5        push    hl
2284  dd6e06    ld      l,(ix+#06)
2287  dd6607    ld      h,(ix+#07)
228a  010800    ld      bc,#0008
228d  09        add     hl,bc
228e  c1        pop     bc
228f  0a        ld      a,(bc)
2290  be        cp      (hl)
2291  203a      jr      nz,#22cd        ; (58)
2293  dd6e04    ld      l,(ix+#04)
2296  dd6605    ld      h,(ix+#05)
2299  010a00    ld      bc,#000a
229c  09        add     hl,bc
229d  e5        push    hl
229e  dd6e06    ld      l,(ix+#06)
22a1  dd6607    ld      h,(ix+#07)
22a4  010a00    ld      bc,#000a
22a7  09        add     hl,bc
22a8  e5        push    hl
22a9  cdd9ba    call    #bad9
22ac  201f      jr      nz,#22cd        ; (31)
22ae  dd6e04    ld      l,(ix+#04)
22b1  dd6605    ld      h,(ix+#05)
22b4  010e00    ld      bc,#000e
22b7  09        add     hl,bc
22b8  e5        push    hl
22b9  dd6e06    ld      l,(ix+#06)
22bc  dd6607    ld      h,(ix+#07)
22bf  010e00    ld      bc,#000e
22c2  09        add     hl,bc
22c3  e5        push    hl
22c4  cdd9ba    call    #bad9
22c7  2004      jr      nz,#22cd        ; (4)
22c9  0e01      ld      c,#01
22cb  1802      jr      #22cf           ; (2)
22cd  0e00      ld      c,#00
22cf  c38bbe    jp      #be8b
22d2  e7        rst     #20
22d3  21f0ff    ld      hl,#fff0
22d6  39        add     hl,sp
22d7  f9        ld      sp,hl
22d8  dd6e04    ld      l,(ix+#04)
22db  dd6605    ld      h,(ix+#05)
22de  cd6ab0    call    #b06a
22e1  dd36f901  ld      (ix-#07),#01
22e5  2e81      ld      l,#81
22e7  cd5cba    call    #ba5c
22ea  dd36f300  ld      (ix-#0d),#00
22ee  dd7e04    ld      a,(ix+#04)
22f1  dd77f6    ld      (ix-#0a),a
22f4  dd7e05    ld      a,(ix+#05)
22f7  dd77f7    ld      (ix-#09),a
22fa  3a3ef1    ld      a,(#f13e)
22fd  5f        ld      e,a
22fe  87        add     a,a
22ff  9f        sbc     a,a
2300  57        ld      d,a
2301  dd7ef6    ld      a,(ix-#0a)
2304  93        sub     e
2305  dd7ef7    ld      a,(ix-#09)
2308  9a        sbc     a,d
2309  f26263    jp      p,#6362
230c  dd6ef6    ld      l,(ix-#0a)
230f  dd66f7    ld      h,(ix-#09)
2312  e5        push    hl
2313  211200    ld      hl,#0012
2316  e5        push    hl
2317  cd2dba    call    #ba2d
231a  e1        pop     hl
231b  01aee9    ld      bc,#e9ae
231e  09        add     hl,bc
231f  dd75f4    ld      (ix-#0c),l
2322  dd74f5    ld      (ix-#0b),h
2325  dd6ef4    ld      l,(ix-#0c)
2328  dd66f5    ld      h,(ix-#0b)
232b  010800    ld      bc,#0008
232e  09        add     hl,bc
232f  7e        ld      a,(hl)
2330  fe01      cp      #01
2332  c21b64    jp      nz,#641b
2335  219cf1    ld      hl,#f19c
2338  e5        push    hl
2339  dd6ef4    ld      l,(ix-#0c)
233c  dd66f5    ld      h,(ix-#0b)
233f  e5        push    hl
2340  df        rst     #18
2341  f1        pop     af
2342  97        sub     a
2343  3298f1    ld      (#f198),a
2346  3299f1    ld      (#f199),a
2349  329af1    ld      (#f19a),a
234c  329bf1    ld      (#f19b),a
234f  2e03      ld      l,#03
2351  cd1d8b    call    #8b1d
2354  dd71f2    ld      (ix-#0e),c
2357  dd7ef2    ld      a,(ix-#0e)
235a  fe02      cp      #02
235c  c22664    jp      nz,#6426
235f  c39664    jp      #6496
2362  dd6e04    ld      l,(ix+#04)
2365  dd6605    ld      h,(ix+#05)
2368  23        inc     hl
2369  dd75f6    ld      (ix-#0a),l
236c  dd74f7    ld      (ix-#09),h
236f  dd6ef6    ld      l,(ix-#0a)
2372  dd66f7    ld      h,(ix-#09)
2375  e5        push    hl
2376  211200    ld      hl,#0012
2379  e5        push    hl
237a  cd2dba    call    #ba2d
237d  e1        pop     hl
237e  01aee9    ld      bc,#e9ae
2381  09        add     hl,bc
2382  dd75f0    ld      (ix-#10),l
2385  dd74f1    ld      (ix-#0f),h
2388  dd6ef0    ld      l,(ix-#10)
238b  dd66f1    ld      h,(ix-#0f)
238e  01eeff    ld      bc,#ffee
2391  09        add     hl,bc
2392  dd75f4    ld      (ix-#0c),l
2395  dd74f5    ld      (ix-#0b),h
2398  3a3ef1    ld      a,(#f13e)
239b  5f        ld      e,a
239c  87        add     a,a
239d  9f        sbc     a,a
239e  57        ld      d,a
239f  dd7ef6    ld      a,(ix-#0a)
23a2  93        sub     e
23a3  dd7ef7    ld      a,(ix-#09)
23a6  9a        sbc     a,d
23a7  f24c65    jp      p,#654c
23aa  dd6ef4    ld      l,(ix-#0c)
23ad  dd66f5    ld      h,(ix-#0b)
23b0  010800    ld      bc,#0008
23b3  09        add     hl,bc
23b4  e5        push    hl
23b5  dd6ef0    ld      l,(ix-#10)
23b8  dd66f1    ld      h,(ix-#0f)
23bb  010800    ld      bc,#0008
23be  09        add     hl,bc
23bf  c1        pop     bc
23c0  0a        ld      a,(bc)
23c1  be        cp      (hl)
23c2  c2dd64    jp      nz,#64dd
23c5  dd6ef4    ld      l,(ix-#0c)
23c8  dd66f5    ld      h,(ix-#0b)
23cb  23        inc     hl
23cc  23        inc     hl
23cd  23        inc     hl
23ce  23        inc     hl
23cf  1135f9    ld      de,#f935
23d2  ff        rst     #38
23d3  2135f9    ld      hl,#f935
23d6  e5        push    hl
23d7  3ab6f0    ld      a,(#f0b6)
23da  323ff9    ld      (#f93f),a
23dd  87        add     a,a
23de  9f        sbc     a,a
23df  3240f9    ld      (#f940),a
23e2  323ef9    ld      (#f93e),a
23e5  323df9    ld      (#f93d),a
23e8  213df9    ld      hl,#f93d
23eb  e5        push    hl
23ec  cd62ba    call    #ba62
23ef  dd6ef0    ld      l,(ix-#10)
23f2  dd66f1    ld      h,(ix-#0f)
23f5  e5        push    hl
23f6  cdb0ba    call    #bab0
23f9  d20a65    jp      nc,#650a
23fc  dd6ef4    ld      l,(ix-#0c)
23ff  dd66f5    ld      h,(ix-#0b)
2402  23        inc     hl
2403  23        inc     hl
2404  23        inc     hl
2405  23        inc     hl
2406  e5        push    hl
2407  dd6ef0    ld      l,(ix-#10)
240a  dd66f1    ld      h,(ix-#0f)
240d  23        inc     hl
240e  23        inc     hl
240f  23        inc     hl
2410  23        inc     hl
2411  e5        push    hl
2412  cdb0ba    call    #bab0
2415  dadd64    jp      c,#64dd
2418  c30a65    jp      #650a
241b  dd34f6    inc     (ix-#0a)
241e  2003      jr      nz,#2423        ; (3)
2420  dd34f7    inc     (ix-#09)
2423  c3fa62    jp      #62fa
2426  dd7ef3    ld      a,(ix-#0d)
2429  ddb6f2    or      (ix-#0e)
242c  dd77f3    ld      (ix-#0d),a
242f  2e05      ld      l,#05
2431  cd1d8b    call    #8b1d
2434  dd71f2    ld      (ix-#0e),c
2437  dd7ef2    ld      a,(ix-#0e)
243a  fe02      cp      #02
243c  ca9664    jp      z,#6496
243f  dd7ef3    ld      a,(ix-#0d)
2442  ddb6f2    or      (ix-#0e)
2445  dd77f3    ld      (ix-#0d),a
2448  dd6ef4    ld      l,(ix-#0c)
244b  dd66f5    ld      h,(ix-#0b)
244e  010e00    ld      bc,#000e
2451  09        add     hl,bc
2452  e5        push    hl
2453  2198f1    ld      hl,#f198
2456  1135f9    ld      de,#f935
2459  ff        rst     #38
245a  2135f9    ld      hl,#f935
245d  e5        push    hl
245e  cd03bb    call    #bb03
2461  cd8dba    call    #ba8d
2464  f1        pop     af
2465  2198f1    ld      hl,#f198
2468  e5        push    hl
2469  21d4f0    ld      hl,#f0d4
246c  e5        push    hl
246d  df        rst     #18
246e  f1        pop     af
246f  2e03      ld      l,#03
2471  cd1d8b    call    #8b1d
2474  dd71f2    ld      (ix-#0e),c
2477  dd7ef2    ld      a,(ix-#0e)
247a  fe02      cp      #02
247c  2818      jr      z,#2496         ; (24)
247e  dd7ef3    ld      a,(ix-#0d)
2481  ddb6f2    or      (ix-#0e)
2484  dd77f3    ld      (ix-#0d),a
2487  2e05      ld      l,#05
2489  cd1d8b    call    #8b1d
248c  dd71f2    ld      (ix-#0e),c
248f  dd7ef2    ld      a,(ix-#0e)
2492  fe02      cp      #02
2494  2005      jr      nz,#249b        ; (5)
2496  0e02      ld      c,#02
2498  c384be    jp      #be84
249b  dd7ef3    ld      a,(ix-#0d)
249e  ddb6f2    or      (ix-#0e)
24a1  dd77f3    ld      (ix-#0d),a
24a4  dd6ef4    ld      l,(ix-#0c)
24a7  dd66f5    ld      h,(ix-#0b)
24aa  010e00    ld      bc,#000e
24ad  09        add     hl,bc
24ae  e5        push    hl
24af  2198f1    ld      hl,#f198
24b2  e5        push    hl
24b3  cd8dba    call    #ba8d
24b6  e1        pop     hl
24b7  7e        ld      a,(hl)
24b8  23        inc     hl
24b9  b6        or      (hl)
24ba  23        inc     hl
24bb  b6        or      (hl)
24bc  23        inc     hl
24bd  b6        or      (hl)
24be  c21b64    jp      nz,#641b
24c1  dd6ef6    ld      l,(ix-#0a)
24c4  dd66f7    ld      h,(ix-#09)
24c7  dd7ef6    ld      a,(ix-#0a)
24ca  d601      sub     #01
24cc  dd77f6    ld      (ix-#0a),a
24cf  dd7ef7    ld      a,(ix-#09)
24d2  de00      sbc     a,#00
24d4  dd77f7    ld      (ix-#09),a
24d7  cd1bb0    call    #b01b
24da  c31b64    jp      #641b
24dd  dd6ef0    ld      l,(ix-#10)
24e0  dd66f1    ld      h,(ix-#0f)
24e3  e5        push    hl
24e4  dd6ef0    ld      l,(ix-#10)
24e7  dd66f1    ld      h,(ix-#0f)
24ea  7d        ld      a,l
24eb  c612      add     a,#12
24ed  6f        ld      l,a
24ee  7c        ld      a,h
24ef  ce00      adc     a,#00
24f1  67        ld      h,a
24f2  dd75f0    ld      (ix-#10),l
24f5  dd74f1    ld      (ix-#0f),h
24f8  e1        pop     hl
24f9  dd75f4    ld      (ix-#0c),l
24fc  dd74f5    ld      (ix-#0b),h
24ff  dd34f6    inc     (ix-#0a)
2502  2003      jr      nz,#2507        ; (3)
2504  dd34f7    inc     (ix-#09)
2507  c39863    jp      #6398
250a  dd6ef4    ld      l,(ix-#0c)
250d  dd66f5    ld      h,(ix-#0b)
2510  23        inc     hl
2511  23        inc     hl
2512  23        inc     hl
2513  23        inc     hl
2514  e5        push    hl
2515  dd6ef0    ld      l,(ix-#10)
2518  dd66f1    ld      h,(ix-#0f)
251b  23        inc     hl
251c  23        inc     hl
251d  23        inc     hl
251e  23        inc     hl
251f  e5        push    hl
2520  df        rst     #18
2521  f1        pop     af
2522  dd6ef4    ld      l,(ix-#0c)
2525  dd66f5    ld      h,(ix-#0b)
2528  010e00    ld      bc,#000e
252b  09        add     hl,bc
252c  e5        push    hl
252d  dd6ef0    ld      l,(ix-#10)
2530  dd66f1    ld      h,(ix-#0f)
2533  010e00    ld      bc,#000e
2536  09        add     hl,bc
2537  e5        push    hl
2538  cd8dba    call    #ba8d
253b  f1        pop     af
253c  dd36f900  ld      (ix-#07),#00
2540  dd6ef6    ld      l,(ix-#0a)
2543  dd66f7    ld      h,(ix-#09)
2546  cd1bb0    call    #b01b
2549  c39863    jp      #6398
254c  dd7ef9    ld      a,(ix-#07)
254f  b7        or      a
2550  cae162    jp      z,#62e1
2553  dd4ef3    ld      c,(ix-#0d)
2556  c384be    jp      #be84
2559  e7        rst     #20
255a  f5        push    af
255b  f5        push    af
255c  f5        push    af
255d  f5        push    af
255e  dd7e04    ld      a,(ix+#04)
2561  dd77f8    ld      (ix-#08),a
2564  87        add     a,a
2565  9f        sbc     a,a
2566  dd77f9    ld      (ix-#07),a
2569  3a3ef1    ld      a,(#f13e)
256c  5f        ld      e,a
256d  87        add     a,a
256e  9f        sbc     a,a
256f  57        ld      d,a
2570  dd7ef8    ld      a,(ix-#08)
2573  93        sub     e
2574  dd7ef9    ld      a,(ix-#07)
2577  9a        sbc     a,d
2578  f2ae65    jp      p,#65ae
257b  dd6ef8    ld      l,(ix-#08)
257e  dd66f9    ld      h,(ix-#07)
2581  e5        push    hl
2582  211200    ld      hl,#0012
2585  e5        push    hl
2586  cd2dba    call    #ba2d
2589  e1        pop     hl
258a  01b6e9    ld      bc,#e9b6
258d  09        add     hl,bc
258e  7e        ld      a,(hl)
258f  fe01      cp      #01
2591  201e      jr      nz,#25b1        ; (30)
2593  dd6ef8    ld      l,(ix-#08)
2596  dd66f9    ld      h,(ix-#07)
2599  dd7ef8    ld      a,(ix-#08)
259c  d601      sub     #01
259e  dd77f8    ld      (ix-#08),a
25a1  dd7ef9    ld      a,(ix-#07)
25a4  de00      sbc     a,#00
25a6  dd77f9    ld      (ix-#07),a
25a9  cd1bb0    call    #b01b
25ac  1803      jr      #25b1           ; (3)
25ae  c384be    jp      #be84
25b1  dd34f8    inc     (ix-#08)
25b4  2003      jr      nz,#25b9        ; (3)
25b6  dd34f9    inc     (ix-#07)
25b9  18ae      jr      #2569           ; (-82)
25bb  f7        rst     #30
25bc  21f0ff    ld      hl,#fff0
25bf  39        add     hl,sp
25c0  f9        ld      sp,hl
25c1  cd66a4    call    #a466
25c4  3a3ef1    ld      a,(#f13e)
25c7  dd77f8    ld      (ix-#08),a
25ca  87        add     a,a
25cb  9f        sbc     a,a
25cc  dd77f9    ld      (ix-#07),a
25cf  2e71      ld      l,#71
25d1  cf        rst     #8
25d2  2e79      ld      l,#79
25d4  d7        rst     #10
25d5  2e60      ld      l,#60
25d7  d7        rst     #10
25d8  2e04      ld      l,#04
25da  e5        push    hl
25db  2e10      ld      l,#10
25dd  e5        push    hl
25de  2139f1    ld      hl,#f139
25e1  cdc57f    call    #7fc5
25e4  2e7f      ld      l,#7f
25e6  d7        rst     #10
25e7  2e72      ld      l,#72
25e9  cf        rst     #8
25ea  3a14f1    ld      a,(#f114)
25ed  dd77f1    ld      (ix-#0f),a
25f0  3a14f1    ld      a,(#f114)
25f3  e6fe      and     #fe
25f5  3214f1    ld      (#f114),a
25f8  dd36f300  ld      (ix-#0d),#00
25fc  97        sub     a
25fd  32a0f1    ld      (#f1a0),a
2600  211af5    ld      hl,#f51a
2603  e5        push    hl
2604  2139f1    ld      hl,#f139
2607  e5        push    hl
2608  df        rst     #18
2609  f1        pop     af
260a  2108f5    ld      hl,#f508
260d  e5        push    hl
260e  211af5    ld      hl,#f51a
2611  e5        push    hl
2612  df        rst     #18
2613  f1        pop     af
2614  cd346a    call    #6a34
2617  dd71f2    ld      (ix-#0e),c
261a  dd7ef2    ld      a,(ix-#0e)
261d  fe02      cp      #02
261f  caaa68    jp      z,#68aa
2622  dd7ef3    ld      a,(ix-#0d)
2625  ddb6f2    or      (ix-#0e)
2628  dd77f3    ld      (ix-#0d),a
262b  211af5    ld      hl,#f51a
262e  e5        push    hl
262f  210cf5    ld      hl,#f50c
2632  e5        push    hl
2633  df        rst     #18
2634  f1        pop     af
2635  3a10f5    ld      a,(#f510)
2638  b7        or      a
2639  280e      jr      z,#2649         ; (14)
263b  2e00      ld      l,#00
263d  cdceb2    call    #b2ce
2640  79        ld      a,c
2641  fe02      cp      #02
2643  c28966    jp      nz,#6689
2646  c3aa68    jp      #68aa
2649  211af5    ld      hl,#f51a
264c  e5        push    hl
264d  2121f1    ld      hl,#f121
2650  e5        push    hl
2651  cdb0ba    call    #bab0
2654  da8368    jp      c,#6883
2657  dd7ef1    ld      a,(ix-#0f)
265a  3214f1    ld      (#f114),a
265d  2e71      ld      l,#71
265f  cf        rst     #8
2660  2e59      ld      l,#59
2662  cf        rst     #8
2663  2e5a      ld      l,#5a
2665  cf        rst     #8
2666  2e5a      ld      l,#5a
2668  cf        rst     #8
2669  2e78      ld      l,#78
266b  d7        rst     #10
266c  2e7f      ld      l,#7f
266e  d7        rst     #10
266f  2e72      ld      l,#72
2671  cf        rst     #8
2672  dd6ef8    ld      l,(ix-#08)
2675  dd66f9    ld      h,(ix-#07)
2678  cdd262    call    #62d2
267b  dd71f2    ld      (ix-#0e),c
267e  dd7ef2    ld      a,(ix-#0e)
2681  fe02      cp      #02
2683  c2dc68    jp      nz,#68dc
2686  c3aa68    jp      #68aa
2689  cd1c70    call    #701c
268c  dd71f2    ld      (ix-#0e),c
268f  dd7ef2    ld      a,(ix-#0e)
2692  fe02      cp      #02
2694  caaa68    jp      z,#68aa
2697  dd7ef3    ld      a,(ix-#0d)
269a  ddb6f2    or      (ix-#0e)
269d  dd77f3    ld      (ix-#0d),a
26a0  3a10f5    ld      a,(#f510)
26a3  b7        or      a
26a4  ca4966    jp      z,#6649
26a7  3a3ef1    ld      a,(#f13e)
26aa  5f        ld      e,a
26ab  87        add     a,a
26ac  9f        sbc     a,a
26ad  57        ld      d,a
26ae  dd7ef8    ld      a,(ix-#08)
26b1  bb        cp      e
26b2  2004      jr      nz,#26b8        ; (4)
26b4  dd7ef9    ld      a,(ix-#07)
26b7  ba        cp      d
26b8  200b      jr      nz,#26c5        ; (11)
26ba  3a3ef1    ld      a,(#f13e)
26bd  fe64      cp      #64
26bf  fa0767    jp      m,#6707
26c2  c35e68    jp      #685e
26c5  3a3ef1    ld      a,(#f13e)
26c8  c6ff      add     a,#ff
26ca  6f        ld      l,a
26cb  dd77f6    ld      (ix-#0a),a
26ce  87        add     a,a
26cf  9f        sbc     a,a
26d0  dd77f7    ld      (ix-#09),a
26d3  dd7ef6    ld      a,(ix-#0a)
26d6  dd96f8    sub     (ix-#08)
26d9  dd7ef7    ld      a,(ix-#09)
26dc  dd9ef9    sbc     a,(ix-#07)
26df  fa2f67    jp      m,#672f
26e2  2108f5    ld      hl,#f508
26e5  e5        push    hl
26e6  dd6ef6    ld      l,(ix-#0a)
26e9  dd66f7    ld      h,(ix-#09)
26ec  e5        push    hl
26ed  211200    ld      hl,#0012
26f0  e5        push    hl
26f1  cd2dba    call    #ba2d
26f4  e1        pop     hl
26f5  01aee9    ld      bc,#e9ae
26f8  09        add     hl,bc
26f9  cdae61    call    #61ae
26fc  79        ld      a,c
26fd  b7        or      a
26fe  ca8767    jp      z,#6787
2701  97        sub     a
2702  3210f5    ld      (#f510),a
2705  1828      jr      #272f           ; (40)
2707  3a3ef1    ld      a,(#f13e)
270a  6f        ld      l,a
270b  3a3ef1    ld      a,(#f13e)
270e  c601      add     a,#01
2710  323ef1    ld      (#f13e),a
2713  7d        ld      a,l
2714  4f        ld      c,a
2715  87        add     a,a
2716  9f        sbc     a,a
2717  47        ld      b,a
2718  c5        push    bc
2719  211200    ld      hl,#0012
271c  e5        push    hl
271d  cd2dba    call    #ba2d
2720  e1        pop     hl
2721  01aee9    ld      bc,#e9ae
2724  09        add     hl,bc
2725  e5        push    hl
2726  2108f5    ld      hl,#f508
2729  cdf8af    call    #aff8
272c  c34966    jp      #6649
272f  3a10f5    ld      a,(#f510)
2732  b7        or      a
2733  ca4966    jp      z,#6649
2736  3a3ef1    ld      a,(#f13e)
2739  4f        ld      c,a
273a  87        add     a,a
273b  9f        sbc     a,a
273c  47        ld      b,a
273d  c5        push    bc
273e  211200    ld      hl,#0012
2741  e5        push    hl
2742  cd2dba    call    #ba2d
2745  e1        pop     hl
2746  019ce9    ld      bc,#e99c
2749  09        add     hl,bc
274a  e5        push    hl
274b  2108f5    ld      hl,#f508
274e  cd4162    call    #6241
2751  79        ld      a,c
2752  b7        or      a
2753  caf667    jp      z,#67f6
2756  3a3ef1    ld      a,(#f13e)
2759  4f        ld      c,a
275a  87        add     a,a
275b  9f        sbc     a,a
275c  47        ld      b,a
275d  c5        push    bc
275e  211200    ld      hl,#0012
2761  e5        push    hl
2762  cd2dba    call    #ba2d
2765  e1        pop     hl
2766  01a0e9    ld      bc,#e9a0
2769  09        add     hl,bc
276a  e5        push    hl
276b  210cf5    ld      hl,#f50c
276e  e5        push    hl
276f  df        rst     #18
2770  f1        pop     af
2771  c34966    jp      #6649
2774  dd7ef6    ld      a,(ix-#0a)
2777  d601      sub     #01
2779  dd77f6    ld      (ix-#0a),a
277c  dd7ef7    ld      a,(ix-#09)
277f  de00      sbc     a,#00
2781  dd77f7    ld      (ix-#09),a
2784  c3d366    jp      #66d3
2787  2112f5    ld      hl,#f512
278a  7e        ld      a,(hl)
278b  23        inc     hl
278c  b6        or      (hl)
278d  23        inc     hl
278e  b6        or      (hl)
278f  23        inc     hl
2790  b6        or      (hl)
2791  2005      jr      nz,#2798        ; (5)
2793  010100    ld      bc,#0001
2796  1803      jr      #279b           ; (3)
2798  010000    ld      bc,#0000
279b  78        ld      a,b
279c  87        add     a,a
279d  9f        sbc     a,a
279e  3235f9    ld      (#f935),a
27a1  3236f9    ld      (#f936),a
27a4  78        ld      a,b
27a5  3238f9    ld      (#f938),a
27a8  79        ld      a,c
27a9  3237f9    ld      (#f937),a
27ac  2135f9    ld      hl,#f935
27af  e5        push    hl
27b0  dd6ef6    ld      l,(ix-#0a)
27b3  dd66f7    ld      h,(ix-#09)
27b6  e5        push    hl
27b7  211200    ld      hl,#0012
27ba  e5        push    hl
27bb  cd2dba    call    #ba2d
27be  e1        pop     hl
27bf  01b8e9    ld      bc,#e9b8
27c2  09        add     hl,bc
27c3  113df9    ld      de,#f93d
27c6  ff        rst     #38
27c7  213df9    ld      hl,#f93d
27ca  e5        push    hl
27cb  cd03bb    call    #bb03
27ce  cd8dba    call    #ba8d
27d1  e1        pop     hl
27d2  7e        ld      a,(hl)
27d3  23        inc     hl
27d4  b6        or      (hl)
27d5  23        inc     hl
27d6  b6        or      (hl)
27d7  23        inc     hl
27d8  b6        or      (hl)
27d9  ca7467    jp      z,#6774
27dc  dde5      push    ix
27de  c1        pop     bc
27df  21f6ff    ld      hl,#fff6
27e2  09        add     hl,bc
27e3  e5        push    hl
27e4  210cf5    ld      hl,#f50c
27e7  e5        push    hl
27e8  2108f5    ld      hl,#f508
27eb  cd605f    call    #5f60
27ee  79        ld      a,c
27ef  b7        or      a
27f0  ca7467    jp      z,#6774
27f3  c35e68    jp      #685e
27f6  3a3ef1    ld      a,(#f13e)
27f9  fe64      cp      #64
27fb  fa1468    jp      m,#6814
27fe  dd6ef8    ld      l,(ix-#08)
2801  dd66f9    ld      h,(ix-#07)
2804  cdd262    call    #62d2
2807  dd71f2    ld      (ix-#0e),c
280a  dd7ef2    ld      a,(ix-#0e)
280d  fe02      cp      #02
280f  202b      jr      nz,#283c        ; (43)
2811  c3aa68    jp      #68aa
2814  3a3ef1    ld      a,(#f13e)
2817  6f        ld      l,a
2818  3a3ef1    ld      a,(#f13e)
281b  c601      add     a,#01
281d  323ef1    ld      (#f13e),a
2820  7d        ld      a,l
2821  4f        ld      c,a
2822  87        add     a,a
2823  9f        sbc     a,a
2824  47        ld      b,a
2825  c5        push    bc
2826  211200    ld      hl,#0012
2829  e5        push    hl
282a  cd2dba    call    #ba2d
282d  e1        pop     hl
282e  01aee9    ld      bc,#e9ae
2831  09        add     hl,bc
2832  e5        push    hl
2833  2108f5    ld      hl,#f508
2836  cdf8af    call    #aff8
2839  c34966    jp      #6649
283c  dd7ef3    ld      a,(ix-#0d)
283f  ddb6f2    or      (ix-#0e)
2842  dd77f3    ld      (ix-#0d),a
2845  3a3ef1    ld      a,(#f13e)
2848  fe64      cp      #64
284a  fa1468    jp      m,#6814
284d  dd6ef8    ld      l,(ix-#08)
2850  dd66f9    ld      h,(ix-#07)
2853  cd5965    call    #6559
2856  3a3ef1    ld      a,(#f13e)
2859  fe64      cp      #64
285b  fa1468    jp      m,#6814
285e  dd7ef1    ld      a,(ix-#0f)
2861  3214f1    ld      (#f114),a
2864  3a40f1    ld      a,(#f140)
2867  dd77f0    ld      (ix-#10),a
286a  3e01      ld      a,#01
286c  3240f1    ld      (#f140),a
286f  2e58      ld      l,#58
2871  cf        rst     #8
2872  2e47      ld      l,#47
2874  d7        rst     #10
2875  dd7ef0    ld      a,(ix-#10)
2878  fe03      cp      #03
287a  c21f6a    jp      nz,#6a1f
287d  cd6fa8    call    #a86f
2880  c31f6a    jp      #6a1f
2883  211af5    ld      hl,#f51a
2886  e5        push    hl
2887  3ab6f0    ld      a,(#f0b6)
288a  3237f9    ld      (#f937),a
288d  87        add     a,a
288e  9f        sbc     a,a
288f  3238f9    ld      (#f938),a
2892  3236f9    ld      (#f936),a
2895  3235f9    ld      (#f935),a
2898  2135f9    ld      hl,#f935
289b  e5        push    hl
289c  cd62ba    call    #ba62
289f  f1        pop     af
28a0  2e00      ld      l,#00
28a2  cdceb2    call    #b2ce
28a5  79        ld      a,c
28a6  fe02      cp      #02
28a8  2010      jr      nz,#28ba        ; (16)
28aa  dd7ef1    ld      a,(ix-#0f)
28ad  3214f1    ld      (#f114),a
28b0  3e01      ld      a,#01
28b2  32a0f1    ld      (#f1a0),a
28b5  0e02      ld      c,#02
28b7  c372be    jp      #be72
28ba  3a1cf5    ld      a,(#f51c)
28bd  b7        or      a
28be  c20a66    jp      nz,#660a
28c1  2e71      ld      l,#71
28c3  cf        rst     #8
28c4  2e59      ld      l,#59
28c6  cf        rst     #8
28c7  2e04      ld      l,#04
28c9  e5        push    hl
28ca  2e10      ld      l,#10
28cc  e5        push    hl
28cd  211af5    ld      hl,#f51a
28d0  cdc57f    call    #7fc5
28d3  2e7f      ld      l,#7f
28d5  d7        rst     #10
28d6  2e72      ld      l,#72
28d8  cf        rst     #8
28d9  c30a66    jp      #660a
28dc  dd7ef3    ld      a,(ix-#0d)
28df  ddb6f2    or      (ix-#0e)
28e2  dd77f3    ld      (ix-#0d),a
28e5  dd7ef8    ld      a,(ix-#08)
28e8  dd77f6    ld      (ix-#0a),a
28eb  dd7ef9    ld      a,(ix-#07)
28ee  dd77f7    ld      (ix-#09),a
28f1  3a3ef1    ld      a,(#f13e)
28f4  5f        ld      e,a
28f5  87        add     a,a
28f6  9f        sbc     a,a
28f7  57        ld      d,a
28f8  dd7ef6    ld      a,(ix-#0a)
28fb  93        sub     e
28fc  dd7ef7    ld      a,(ix-#09)
28ff  9a        sbc     a,d
2900  f21069    jp      p,#6910
2903  2e00      ld      l,#00
2905  cdceb2    call    #b2ce
2908  79        ld      a,c
2909  fe02      cp      #02
290b  2029      jr      nz,#2936        ; (41)
290d  c3aa68    jp      #68aa
2910  2e71      ld      l,#71
2912  cf        rst     #8
2913  2e5a      ld      l,#5a
2915  cf        rst     #8
2916  2e7f      ld      l,#7f
2918  e5        push    hl
2919  2eff      ld      l,#ff
291b  cd657f    call    #7f65
291e  2e72      ld      l,#72
2920  cf        rst     #8
2921  3e01      ld      a,#01
2923  32a0f1    ld      (#f1a0),a
2926  dd4ef3    ld      c,(ix-#0d)
2929  c372be    jp      #be72
292c  dd34f6    inc     (ix-#0a)
292f  2003      jr      nz,#2934        ; (3)
2931  dd34f7    inc     (ix-#09)
2934  18bb      jr      #28f1           ; (-69)
2936  dd6ef6    ld      l,(ix-#0a)
2939  dd66f7    ld      h,(ix-#09)
293c  e5        push    hl
293d  211200    ld      hl,#0012
2940  e5        push    hl
2941  cd2dba    call    #ba2d
2944  e1        pop     hl
2945  01b6e9    ld      bc,#e9b6
2948  09        add     hl,bc
2949  7e        ld      a,(hl)
294a  fe03      cp      #03
294c  20de      jr      nz,#292c        ; (-34)
294e  2e00      ld      l,#00
2950  e5        push    hl
2951  dd6ef6    ld      l,(ix-#0a)
2954  dd66f7    ld      h,(ix-#09)
2957  e5        push    hl
2958  211200    ld      hl,#0012
295b  e5        push    hl
295c  cd2dba    call    #ba2d
295f  e1        pop     hl
2960  01b2e9    ld      bc,#e9b2
2963  09        add     hl,bc
2964  e5        push    hl
2965  dd6ef6    ld      l,(ix-#0a)
2968  dd66f7    ld      h,(ix-#09)
296b  e5        push    hl
296c  211200    ld      hl,#0012
296f  e5        push    hl
2970  cd2dba    call    #ba2d
2973  e1        pop     hl
2974  01aee9    ld      bc,#e9ae
2977  09        add     hl,bc
2978  cdfaac    call    #acfa
297b  dd71f2    ld      (ix-#0e),c
297e  dd7ef2    ld      a,(ix-#0e)
2981  fe02      cp      #02
2983  caaa68    jp      z,#68aa
2986  dd7ef3    ld      a,(ix-#0d)
2989  ddb6f2    or      (ix-#0e)
298c  dd77f3    ld      (ix-#0d),a
298f  dd6ef6    ld      l,(ix-#0a)
2992  dd66f7    ld      h,(ix-#09)
2995  e5        push    hl
2996  211200    ld      hl,#0012
2999  e5        push    hl
299a  cd2dba    call    #ba2d
299d  e1        pop     hl
299e  01bce9    ld      bc,#e9bc
29a1  09        add     hl,bc
29a2  3a45f3    ld      a,(#f345)
29a5  77        ld      (hl),a
29a6  3a46f3    ld      a,(#f346)
29a9  23        inc     hl
29aa  77        ld      (hl),a
29ab  dd7ef8    ld      a,(ix-#08)
29ae  dd77f4    ld      (ix-#0c),a
29b1  dd7ef9    ld      a,(ix-#07)
29b4  dd77f5    ld      (ix-#0b),a
29b7  dd7ef4    ld      a,(ix-#0c)
29ba  dd96f6    sub     (ix-#0a)
29bd  dd7ef5    ld      a,(ix-#0b)
29c0  dd9ef7    sbc     a,(ix-#09)
29c3  f22c69    jp      p,#692c
29c6  dd6ef6    ld      l,(ix-#0a)
29c9  dd66f7    ld      h,(ix-#09)
29cc  e5        push    hl
29cd  211200    ld      hl,#0012
29d0  e5        push    hl
29d1  cd2dba    call    #ba2d
29d4  e1        pop     hl
29d5  01bce9    ld      bc,#e9bc
29d8  09        add     hl,bc
29d9  e5        push    hl
29da  dd6ef4    ld      l,(ix-#0c)
29dd  dd66f5    ld      h,(ix-#0b)
29e0  e5        push    hl
29e1  211200    ld      hl,#0012
29e4  e5        push    hl
29e5  cd2dba    call    #ba2d
29e8  e1        pop     hl
29e9  01bce9    ld      bc,#e9bc
29ec  09        add     hl,bc
29ed  c1        pop     bc
29ee  0a        ld      a,(bc)
29ef  be        cp      (hl)
29f0  2004      jr      nz,#29f6        ; (4)
29f2  03        inc     bc
29f3  0a        ld      a,(bc)
29f4  23        inc     hl
29f5  be        cp      (hl)
29f6  201c      jr      nz,#2a14        ; (28)
29f8  dd6ef6    ld      l,(ix-#0a)
29fb  dd66f7    ld      h,(ix-#09)
29fe  dd7ef6    ld      a,(ix-#0a)
2a01  d601      sub     #01
2a03  dd77f6    ld      (ix-#0a),a
2a06  dd7ef7    ld      a,(ix-#09)
2a09  de00      sbc     a,#00
2a0b  dd77f7    ld      (ix-#09),a
2a0e  cd1bb0    call    #b01b
2a11  c32c69    jp      #692c
2a14  dd34f4    inc     (ix-#0c)
2a17  2003      jr      nz,#2a1c        ; (3)
2a19  dd34f5    inc     (ix-#0b)
2a1c  c3b769    jp      #69b7
2a1f  3a26f1    ld      a,(#f126)
2a22  3269e9    ld      (#e969),a
2a25  3e45      ld      a,#45
2a27  3226f1    ld      (#f126),a
2a2a  3e01      ld      a,#01
2a2c  32a0f1    ld      (#f1a0),a
2a2f  0e02      ld      c,#02
2a31  c372be    jp      #be72
2a34  f7        rst     #30
2a35  21f6ff    ld      hl,#fff6
2a38  39        add     hl,sp
2a39  f9        ld      sp,hl
2a3a  2121f1    ld      hl,#f121
2a3d  e5        push    hl
2a3e  2126f5    ld      hl,#f526
2a41  e5        push    hl
2a42  3ab6f0    ld      a,(#f0b6)
2a45  2f        cpl     
2a46  3c        inc     a
2a47  e63f      and     #3f
2a49  6f        ld      l,a
2a4a  4d        ld      c,l
2a4b  44        ld      b,h
2a4c  79        ld      a,c
2a4d  3237f9    ld      (#f937),a
2a50  87        add     a,a
2a51  9f        sbc     a,a
2a52  3238f9    ld      (#f938),a
2a55  3236f9    ld      (#f936),a
2a58  3235f9    ld      (#f935),a
2a5b  2135f9    ld      hl,#f935
2a5e  e5        push    hl
2a5f  219cf1    ld      hl,#f19c
2a62  e5        push    hl
2a63  2108f5    ld      hl,#f508
2a66  e5        push    hl
2a67  df        rst     #18
2a68  cdd4bd    call    #bdd4
2a6b  df        rst     #18
2a6c  cdb0ba    call    #bab0
2a6f  300a      jr      nc,#2a7b        ; (10)
2a71  2126f5    ld      hl,#f526
2a74  e5        push    hl
2a75  2121f1    ld      hl,#f121
2a78  e5        push    hl
2a79  df        rst     #18
2a7a  f1        pop     af
2a7b  210cf5    ld      hl,#f50c
2a7e  e5        push    hl
2a7f  2126f5    ld      hl,#f526
2a82  e5        push    hl
2a83  df        rst     #18
2a84  f1        pop     af
2a85  97        sub     a
2a86  3212f5    ld      (#f512),a
2a89  3213f5    ld      (#f513),a
2a8c  3214f5    ld      (#f514),a
2a8f  3215f5    ld      (#f515),a
2a92  dd36f700  ld      (ix-#09),#00
2a96  2e0d      ld      l,#0d
2a98  cd1d8b    call    #8b1d
2a9b  dd71f6    ld      (ix-#0a),c
2a9e  dd7ef6    ld      a,(ix-#0a)
2aa1  fe02      cp      #02
2aa3  ca566f    jp      z,#6f56
2aa6  dd7ef7    ld      a,(ix-#09)
2aa9  ddb6f6    or      (ix-#0a)
2aac  dd77f7    ld      (ix-#09),a
2aaf  2116f5    ld      hl,#f516
2ab2  e5        push    hl
2ab3  2147f3    ld      hl,#f347
2ab6  1135f9    ld      de,#f935
2ab9  ff        rst     #38
2aba  2135f9    ld      hl,#f935
2abd  e5        push    hl
2abe  21d4f0    ld      hl,#f0d4
2ac1  e5        push    hl
2ac2  cd23be    call    #be23
2ac5  df        rst     #18
2ac6  f1        pop     af
2ac7  2116f5    ld      hl,#f516
2aca  7e        ld      a,(hl)
2acb  23        inc     hl
2acc  b6        or      (hl)
2acd  23        inc     hl
2ace  b6        or      (hl)
2acf  23        inc     hl
2ad0  b6        or      (hl)
2ad1  283b      jr      z,#2b0e         ; (59)
2ad3  219cf1    ld      hl,#f19c
2ad6  1135f9    ld      de,#f935
2ad9  ff        rst     #38
2ada  2135f9    ld      hl,#f935
2add  e5        push    hl
2ade  3e3f      ld      a,#3f
2ae0  323ff9    ld      (#f93f),a
2ae3  87        add     a,a
2ae4  9f        sbc     a,a
2ae5  3240f9    ld      (#f940),a
2ae8  323ef9    ld      (#f93e),a
2aeb  323df9    ld      (#f93d),a
2aee  213df9    ld      hl,#f93d
2af1  e5        push    hl
2af2  cd8dba    call    #ba8d
2af5  e1        pop     hl
2af6  7e        ld      a,(hl)
2af7  23        inc     hl
2af8  b6        or      (hl)
2af9  23        inc     hl
2afa  b6        or      (hl)
2afb  23        inc     hl
2afc  b6        or      (hl)
2afd  c2786e    jp      nz,#6e78
2b00  2116f5    ld      hl,#f516
2b03  e5        push    hl
2b04  21d4f0    ld      hl,#f0d4
2b07  e5        push    hl
2b08  cdd9ba    call    #bad9
2b0b  c2786e    jp      nz,#6e78
2b0e  2116f5    ld      hl,#f516
2b11  7e        ld      a,(hl)
2b12  23        inc     hl
2b13  b6        or      (hl)
2b14  23        inc     hl
2b15  b6        or      (hl)
2b16  23        inc     hl
2b17  b6        or      (hl)
2b18  2808      jr      z,#2b22         ; (8)
2b1a  3e02      ld      a,#02
2b1c  3210f5    ld      (#f510),a
2b1f  c3ca6b    jp      #6bca
2b22  2108f5    ld      hl,#f508
2b25  1135f9    ld      de,#f935
2b28  ff        rst     #38
2b29  2135f9    ld      hl,#f935
2b2c  e5        push    hl
2b2d  3e3f      ld      a,#3f
2b2f  323ff9    ld      (#f93f),a
2b32  87        add     a,a
2b33  9f        sbc     a,a
2b34  3240f9    ld      (#f940),a
2b37  323ef9    ld      (#f93e),a
2b3a  323df9    ld      (#f93d),a
2b3d  213df9    ld      hl,#f93d
2b40  e5        push    hl
2b41  cd8dba    call    #ba8d
2b44  e1        pop     hl
2b45  7e        ld      a,(hl)
2b46  23        inc     hl
2b47  b6        or      (hl)
2b48  23        inc     hl
2b49  b6        or      (hl)
2b4a  23        inc     hl
2b4b  b6        or      (hl)
2b4c  2807      jr      z,#2b55         ; (7)
2b4e  97        sub     a
2b4f  3210f5    ld      (#f510),a
2b52  c3ca6b    jp      #6bca
2b55  3e03      ld      a,#03
2b57  3210f5    ld      (#f510),a
2b5a  dd36f801  ld      (ix-#08),#01
2b5e  2e05      ld      l,#05
2b60  cd1d8b    call    #8b1d
2b63  dd71f6    ld      (ix-#0a),c
2b66  dd7ef6    ld      a,(ix-#0a)
2b69  fe02      cp      #02
2b6b  ca566f    jp      z,#6f56
2b6e  dd7ef7    ld      a,(ix-#09)
2b71  ddb6f6    or      (ix-#0a)
2b74  dd77f7    ld      (ix-#09),a
2b77  211ef5    ld      hl,#f51e
2b7a  e5        push    hl
2b7b  2198f1    ld      hl,#f198
2b7e  e5        push    hl
2b7f  df        rst     #18
2b80  f1        pop     af
2b81  2e05      ld      l,#05
2b83  cd1d8b    call    #8b1d
2b86  dd71f6    ld      (ix-#0a),c
2b89  dd7ef6    ld      a,(ix-#0a)
2b8c  fe02      cp      #02
2b8e  ca566f    jp      z,#6f56
2b91  dd7ef7    ld      a,(ix-#09)
2b94  ddb6f6    or      (ix-#0a)
2b97  dd77f7    ld      (ix-#09),a
2b9a  211ef5    ld      hl,#f51e
2b9d  e5        push    hl
2b9e  2198f1    ld      hl,#f198
2ba1  e5        push    hl
2ba2  cdd9ba    call    #bad9
2ba5  2823      jr      z,#2bca         ; (35)
2ba7  2e05      ld      l,#05
2ba9  cd1d8b    call    #8b1d
2bac  dd71f6    ld      (ix-#0a),c
2baf  dd7ef6    ld      a,(ix-#0a)
2bb2  fe02      cp      #02
2bb4  ca566f    jp      z,#6f56
2bb7  dd7ef7    ld      a,(ix-#09)
2bba  ddb6f6    or      (ix-#0a)
2bbd  dd77f7    ld      (ix-#09),a
2bc0  211ef5    ld      hl,#f51e
2bc3  e5        push    hl
2bc4  2198f1    ld      hl,#f198
2bc7  e5        push    hl
2bc8  df        rst     #18
2bc9  f1        pop     af
2bca  219cf1    ld      hl,#f19c
2bcd  e5        push    hl
2bce  2126f5    ld      hl,#f526
2bd1  e5        push    hl
2bd2  cdd9ba    call    #bad9
2bd5  282f      jr      z,#2c06         ; (47)
2bd7  219cf1    ld      hl,#f19c
2bda  e5        push    hl
2bdb  3ab6f0    ld      a,(#f0b6)
2bde  3237f9    ld      (#f937),a
2be1  87        add     a,a
2be2  9f        sbc     a,a
2be3  3238f9    ld      (#f938),a
2be6  3236f9    ld      (#f936),a
2be9  3235f9    ld      (#f935),a
2bec  2135f9    ld      hl,#f935
2bef  e5        push    hl
2bf0  cd62ba    call    #ba62
2bf3  f1        pop     af
2bf4  2e0d      ld      l,#0d
2bf6  cd1d8b    call    #8b1d
2bf9  dd71f6    ld      (ix-#0a),c
2bfc  dd7ef6    ld      a,(ix-#0a)
2bff  fe02      cp      #02
2c01  2019      jr      nz,#2c1c        ; (25)
2c03  c3566f    jp      #6f56
2c06  3a10f5    ld      a,(#f510)
2c09  fe03      cp      #03
2c0b  c2cd6c    jp      nz,#6ccd
2c0e  dd7ef8    ld      a,(ix-#08)
2c11  b7        or      a
2c12  cacd6c    jp      z,#6ccd
2c15  97        sub     a
2c16  3210f5    ld      (#f510),a
2c19  c3cd6c    jp      #6ccd
2c1c  dd7ef7    ld      a,(ix-#09)
2c1f  ddb6f6    or      (ix-#0a)
2c22  dd77f7    ld      (ix-#09),a
2c25  2147f3    ld      hl,#f347
2c28  1135f9    ld      de,#f935
2c2b  ff        rst     #38
2c2c  2135f9    ld      hl,#f935
2c2f  e5        push    hl
2c30  21d4f0    ld      hl,#f0d4
2c33  e5        push    hl
2c34  cd23be    call    #be23
2c37  2116f5    ld      hl,#f516
2c3a  e5        push    hl
2c3b  cdd9ba    call    #bad9
2c3e  282c      jr      z,#2c6c         ; (44)
2c40  210cf5    ld      hl,#f50c
2c43  e5        push    hl
2c44  219cf1    ld      hl,#f19c
2c47  1135f9    ld      de,#f935
2c4a  ff        rst     #38
2c4b  2135f9    ld      hl,#f935
2c4e  e5        push    hl
2c4f  3ab6f0    ld      a,(#f0b6)
2c52  323ff9    ld      (#f93f),a
2c55  87        add     a,a
2c56  9f        sbc     a,a
2c57  3240f9    ld      (#f940),a
2c5a  323ef9    ld      (#f93e),a
2c5d  323df9    ld      (#f93d),a
2c60  213df9    ld      hl,#f93d
2c63  e5        push    hl
2c64  cdf7bd    call    #bdf7
2c67  df        rst     #18
2c68  f1        pop     af
2c69  c3066c    jp      #6c06
2c6c  3a10f5    ld      a,(#f510)
2c6f  fe03      cp      #03
2c71  c2ca6b    jp      nz,#6bca
2c74  dd7ef8    ld      a,(ix-#08)
2c77  b7        or      a
2c78  caca6b    jp      z,#6bca
2c7b  2e05      ld      l,#05
2c7d  cd1d8b    call    #8b1d
2c80  dd71f6    ld      (ix-#0a),c
2c83  dd7ef6    ld      a,(ix-#0a)
2c86  fe02      cp      #02
2c88  ca566f    jp      z,#6f56
2c8b  dd7ef7    ld      a,(ix-#09)
2c8e  ddb6f6    or      (ix-#0a)
2c91  dd77f7    ld      (ix-#09),a
2c94  2198f1    ld      hl,#f198
2c97  e5        push    hl
2c98  211ef5    ld      hl,#f51e
2c9b  e5        push    hl
2c9c  cdd9ba    call    #bad9
2c9f  caca6b    jp      z,#6bca
2ca2  219cf1    ld      hl,#f19c
2ca5  1135f9    ld      de,#f935
2ca8  ff        rst     #38
2ca9  2135f9    ld      hl,#f935
2cac  e5        push    hl
2cad  2198f1    ld      hl,#f198
2cb0  e5        push    hl
2cb1  cd23be    call    #be23
2cb4  21d4f0    ld      hl,#f0d4
2cb7  e5        push    hl
2cb8  cd8dba    call    #ba8d
2cbb  e1        pop     hl
2cbc  7e        ld      a,(hl)
2cbd  23        inc     hl
2cbe  b6        or      (hl)
2cbf  23        inc     hl
2cc0  b6        or      (hl)
2cc1  23        inc     hl
2cc2  b6        or      (hl)
2cc3  caca6b    jp      z,#6bca
2cc6  dd36f800  ld      (ix-#08),#00
2cca  c3ca6b    jp      #6bca
2ccd  3a10f5    ld      a,(#f510)
2cd0  b7        or      a
2cd1  2840      jr      z,#2d13         ; (64)
2cd3  210cf5    ld      hl,#f50c
2cd6  1135f9    ld      de,#f935
2cd9  ff        rst     #38
2cda  2135f9    ld      hl,#f935
2cdd  e5        push    hl
2cde  2108f5    ld      hl,#f508
2ce1  e5        push    hl
2ce2  cdf7bd    call    #bdf7
2ce5  2e40      ld      l,#40
2ce7  3ab6f0    ld      a,(#f0b6)
2cea  4f        ld      c,a
2ceb  7d        ld      a,l
2cec  91        sub     c
2ced  6f        ld      l,a
2cee  4d        ld      c,l
2cef  44        ld      b,h
2cf0  79        ld      a,c
2cf1  323ff9    ld      (#f93f),a
2cf4  87        add     a,a
2cf5  9f        sbc     a,a
2cf6  3240f9    ld      (#f940),a
2cf9  323ef9    ld      (#f93e),a
2cfc  323df9    ld      (#f93d),a
2cff  213df9    ld      hl,#f93d
2d02  e5        push    hl
2d03  cdb0ba    call    #bab0
2d06  3011      jr      nc,#2d19        ; (17)
2d08  3a10f5    ld      a,(#f510)
2d0b  fe02      cp      #02
2d0d  c2726d    jp      nz,#6d72
2d10  c3786e    jp      #6e78
2d13  dd4ef7    ld      c,(ix-#09)
2d16  c372be    jp      #be72
2d19  3a10f5    ld      a,(#f510)
2d1c  fe02      cp      #02
2d1e  c2796d    jp      nz,#6d79
2d21  2122f5    ld      hl,#f522
2d24  e5        push    hl
2d25  2108f5    ld      hl,#f508
2d28  e5        push    hl
2d29  df        rst     #18
2d2a  f1        pop     af
2d2b  219cf1    ld      hl,#f19c
2d2e  e5        push    hl
2d2f  2122f5    ld      hl,#f522
2d32  e5        push    hl
2d33  df        rst     #18
2d34  f1        pop     af
2d35  2198f1    ld      hl,#f198
2d38  e5        push    hl
2d39  219cf1    ld      hl,#f19c
2d3c  1135f9    ld      de,#f935
2d3f  ff        rst     #38
2d40  2135f9    ld      hl,#f935
2d43  e5        push    hl
2d44  3ad9f0    ld      a,(#f0d9)
2d47  4f        ld      c,a
2d48  87        add     a,a
2d49  9f        sbc     a,a
2d4a  47        ld      b,a
2d4b  c5        push    bc
2d4c  cd0fbd    call    #bd0f
2d4f  219cf1    ld      hl,#f19c
2d52  e5        push    hl
2d53  cd62ba    call    #ba62
2d56  21d4f0    ld      hl,#f0d4
2d59  e5        push    hl
2d5a  cd8dba    call    #ba8d
2d5d  df        rst     #18
2d5e  f1        pop     af
2d5f  2e03      ld      l,#03
2d61  cd1d8b    call    #8b1d
2d64  dd71f6    ld      (ix-#0a),c
2d67  dd7ef6    ld      a,(ix-#0a)
2d6a  fe02      cp      #02
2d6c  c2e66d    jp      nz,#6de6
2d6f  c3566f    jp      #6f56
2d72  97        sub     a
2d73  3210f5    ld      (#f510),a
2d76  c3136d    jp      #6d13
2d79  3ab6f0    ld      a,(#f0b6)
2d7c  dd77f9    ld      (ix-#07),a
2d7f  dd7ef9    ld      a,(ix-#07)
2d82  fe40      cp      #40
2d84  f2136d    jp      p,#6d13
2d87  dd36f801  ld      (ix-#08),#01
2d8b  2122f5    ld      hl,#f522
2d8e  e5        push    hl
2d8f  2108f5    ld      hl,#f508
2d92  e5        push    hl
2d93  df        rst     #18
2d94  f1        pop     af
2d95  2122f5    ld      hl,#f522
2d98  e5        push    hl
2d99  210cf5    ld      hl,#f50c
2d9c  e5        push    hl
2d9d  cdb0ba    call    #bab0
2da0  d2e16e    jp      nc,#6ee1
2da3  210cf5    ld      hl,#f50c
2da6  e5        push    hl
2da7  212ef5    ld      hl,#f52e
2daa  e5        push    hl
2dab  219cf1    ld      hl,#f19c
2dae  e5        push    hl
2daf  2122f5    ld      hl,#f522
2db2  e5        push    hl
2db3  df        rst     #18
2db4  e1        pop     hl
2db5  1135f9    ld      de,#f935
2db8  ff        rst     #38
2db9  2135f9    ld      hl,#f935
2dbc  e5        push    hl
2dbd  dde5      push    ix
2dbf  c1        pop     bc
2dc0  21f9ff    ld      hl,#fff9
2dc3  09        add     hl,bc
2dc4  4d        ld      c,l
2dc5  44        ld      b,h
2dc6  0a        ld      a,(bc)
2dc7  323ff9    ld      (#f93f),a
2dca  87        add     a,a
2dcb  9f        sbc     a,a
2dcc  3240f9    ld      (#f940),a
2dcf  323ef9    ld      (#f93e),a
2dd2  323df9    ld      (#f93d),a
2dd5  213df9    ld      hl,#f93d
2dd8  e5        push    hl
2dd9  cdd4bd    call    #bdd4
2ddc  df        rst     #18
2ddd  cdb0ba    call    #bab0
2de0  d20e6f    jp      nc,#6f0e
2de3  c3e16e    jp      #6ee1
2de6  dd7ef7    ld      a,(ix-#09)
2de9  ddb6f6    or      (ix-#0a)
2dec  dd77f7    ld      (ix-#09),a
2def  2122f5    ld      hl,#f522
2df2  e5        push    hl
2df3  210cf5    ld      hl,#f50c
2df6  e5        push    hl
2df7  cdd9ba    call    #bad9
2dfa  2026      jr      nz,#2e22        ; (38)
2dfc  2122f5    ld      hl,#f522
2dff  e5        push    hl
2e00  2108f5    ld      hl,#f508
2e03  e5        push    hl
2e04  df        rst     #18
2e05  f1        pop     af
2e06  219cf1    ld      hl,#f19c
2e09  e5        push    hl
2e0a  2122f5    ld      hl,#f522
2e0d  e5        push    hl
2e0e  df        rst     #18
2e0f  f1        pop     af
2e10  2e05      ld      l,#05
2e12  cd1d8b    call    #8b1d
2e15  dd71f6    ld      (ix-#0a),c
2e18  dd7ef6    ld      a,(ix-#0a)
2e1b  fe02      cp      #02
2e1d  2023      jr      nz,#2e42        ; (35)
2e1f  c3566f    jp      #6f56
2e22  2122f5    ld      hl,#f522
2e25  e5        push    hl
2e26  3ab6f0    ld      a,(#f0b6)
2e29  3237f9    ld      (#f937),a
2e2c  87        add     a,a
2e2d  9f        sbc     a,a
2e2e  3238f9    ld      (#f938),a
2e31  3236f9    ld      (#f936),a
2e34  3235f9    ld      (#f935),a
2e37  2135f9    ld      hl,#f935
2e3a  e5        push    hl
2e3b  cd62ba    call    #ba62
2e3e  f1        pop     af
2e3f  c32b6d    jp      #6d2b
2e42  dd7ef7    ld      a,(ix-#09)
2e45  ddb6f6    or      (ix-#0a)
2e48  dd77f7    ld      (ix-#09),a
2e4b  219cf1    ld      hl,#f19c
2e4e  1135f9    ld      de,#f935
2e51  ff        rst     #38
2e52  2135f9    ld      hl,#f935
2e55  e5        push    hl
2e56  3ad9f0    ld      a,(#f0d9)
2e59  4f        ld      c,a
2e5a  87        add     a,a
2e5b  9f        sbc     a,a
2e5c  47        ld      b,a
2e5d  c5        push    bc
2e5e  cd0fbd    call    #bd0f
2e61  219cf1    ld      hl,#f19c
2e64  e5        push    hl
2e65  cd62ba    call    #ba62
2e68  21d4f0    ld      hl,#f0d4
2e6b  e5        push    hl
2e6c  cd8dba    call    #ba8d
2e6f  2198f1    ld      hl,#f198
2e72  e5        push    hl
2e73  cdd9ba    call    #bad9
2e76  282f      jr      z,#2ea7         ; (47)
2e78  219cf1    ld      hl,#f19c
2e7b  e5        push    hl
2e7c  210cf5    ld      hl,#f50c
2e7f  e5        push    hl
2e80  2108f5    ld      hl,#f508
2e83  e5        push    hl
2e84  df        rst     #18
2e85  df        rst     #18
2e86  f1        pop     af
2e87  97        sub     a
2e88  3298f1    ld      (#f198),a
2e8b  3299f1    ld      (#f199),a
2e8e  329af1    ld      (#f19a),a
2e91  329bf1    ld      (#f19b),a
2e94  2e03      ld      l,#03
2e96  cd1d8b    call    #8b1d
2e99  dd71f6    ld      (ix-#0a),c
2e9c  dd7ef6    ld      a,(ix-#0a)
2e9f  fe02      cp      #02
2ea1  c2796f    jp      nz,#6f79
2ea4  c3566f    jp      #6f56
2ea7  2122f5    ld      hl,#f522
2eaa  e5        push    hl
2eab  210cf5    ld      hl,#f50c
2eae  e5        push    hl
2eaf  cdd9ba    call    #bad9
2eb2  ca136d    jp      z,#6d13
2eb5  2122f5    ld      hl,#f522
2eb8  e5        push    hl
2eb9  3ab6f0    ld      a,(#f0b6)
2ebc  3237f9    ld      (#f937),a
2ebf  87        add     a,a
2ec0  9f        sbc     a,a
2ec1  3238f9    ld      (#f938),a
2ec4  3236f9    ld      (#f936),a
2ec7  3235f9    ld      (#f935),a
2eca  2135f9    ld      hl,#f935
2ecd  e5        push    hl
2ece  cd62ba    call    #ba62
2ed1  f1        pop     af
2ed2  c3066e    jp      #6e06
2ed5  dd6ef9    ld      l,(ix-#07)
2ed8  7d        ld      a,l
2ed9  87        add     a,a
2eda  6f        ld      l,a
2edb  dd75f9    ld      (ix-#07),l
2ede  c37f6d    jp      #6d7f
2ee1  dd7ef8    ld      a,(ix-#08)
2ee4  b7        or      a
2ee5  28ee      jr      z,#2ed5         ; (-18)
2ee7  97        sub     a
2ee8  3210f5    ld      (#f510),a
2eeb  c3136d    jp      #6d13
2eee  2122f5    ld      hl,#f522
2ef1  e5        push    hl
2ef2  3ab6f0    ld      a,(#f0b6)
2ef5  3237f9    ld      (#f937),a
2ef8  87        add     a,a
2ef9  9f        sbc     a,a
2efa  3238f9    ld      (#f938),a
2efd  3236f9    ld      (#f936),a
2f00  3235f9    ld      (#f935),a
2f03  2135f9    ld      hl,#f935
2f06  e5        push    hl
2f07  cd62ba    call    #ba62
2f0a  f1        pop     af
2f0b  c3956d    jp      #6d95
2f0e  212ef5    ld      hl,#f52e
2f11  e5        push    hl
2f12  219cf1    ld      hl,#f19c
2f15  e5        push    hl
2f16  cdd9ba    call    #bad9
2f19  28d3      jr      z,#2eee         ; (-45)
2f1b  2e05      ld      l,#05
2f1d  cd1d8b    call    #8b1d
2f20  dd71f6    ld      (ix-#0a),c
2f23  dd7ef6    ld      a,(ix-#0a)
2f26  fe02      cp      #02
2f28  282c      jr      z,#2f56         ; (44)
2f2a  dd7ef7    ld      a,(ix-#09)
2f2d  ddb6f6    or      (ix-#0a)
2f30  dd77f7    ld      (ix-#09),a
2f33  212af5    ld      hl,#f52a
2f36  e5        push    hl
2f37  2198f1    ld      hl,#f198
2f3a  e5        push    hl
2f3b  df        rst     #18
2f3c  f1        pop     af
2f3d  219cf1    ld      hl,#f19c
2f40  e5        push    hl
2f41  212ef5    ld      hl,#f52e
2f44  e5        push    hl
2f45  df        rst     #18
2f46  f1        pop     af
2f47  2e05      ld      l,#05
2f49  cd1d8b    call    #8b1d
2f4c  dd71f6    ld      (ix-#0a),c
2f4f  dd7ef6    ld      a,(ix-#0a)
2f52  fe02      cp      #02
2f54  2005      jr      nz,#2f5b        ; (5)
2f56  0e02      ld      c,#02
2f58  c372be    jp      #be72
2f5b  dd7ef7    ld      a,(ix-#09)
2f5e  ddb6f6    or      (ix-#0a)
2f61  dd77f7    ld      (ix-#09),a
2f64  2198f1    ld      hl,#f198
2f67  e5        push    hl
2f68  212af5    ld      hl,#f52a
2f6b  e5        push    hl
2f6c  cdd9ba    call    #bad9
2f6f  caee6e    jp      z,#6eee
2f72  dd36f800  ld      (ix-#08),#00
2f76  c3e16e    jp      #6ee1
2f79  dd7ef7    ld      a,(ix-#09)
2f7c  ddb6f6    or      (ix-#0a)
2f7f  dd77f7    ld      (ix-#09),a
2f82  2e05      ld      l,#05
2f84  cd1d8b    call    #8b1d
2f87  dd71f6    ld      (ix-#0a),c
2f8a  dd7ef6    ld      a,(ix-#0a)
2f8d  fe02      cp      #02
2f8f  28c5      jr      z,#2f56         ; (-59)
2f91  dd7ef7    ld      a,(ix-#09)
2f94  ddb6f6    or      (ix-#0a)
2f97  dd77f7    ld      (ix-#09),a
2f9a  212af5    ld      hl,#f52a
2f9d  e5        push    hl
2f9e  2198f1    ld      hl,#f198
2fa1  e5        push    hl
2fa2  df        rst     #18
2fa3  f1        pop     af
2fa4  2198f1    ld      hl,#f198
2fa7  e5        push    hl
2fa8  21d4f0    ld      hl,#f0d4
2fab  e5        push    hl
2fac  df        rst     #18
2fad  f1        pop     af
2fae  2e03      ld      l,#03
2fb0  cd1d8b    call    #8b1d
2fb3  dd71f6    ld      (ix-#0a),c
2fb6  dd7ef6    ld      a,(ix-#0a)
2fb9  fe02      cp      #02
2fbb  ca566f    jp      z,#6f56
2fbe  dd7ef7    ld      a,(ix-#09)
2fc1  ddb6f6    or      (ix-#0a)
2fc4  dd77f7    ld      (ix-#09),a
2fc7  2e05      ld      l,#05
2fc9  cd1d8b    call    #8b1d
2fcc  dd71f6    ld      (ix-#0a),c
2fcf  dd7ef6    ld      a,(ix-#0a)
2fd2  fe02      cp      #02
2fd4  ca566f    jp      z,#6f56
2fd7  dd7ef7    ld      a,(ix-#09)
2fda  ddb6f6    or      (ix-#0a)
2fdd  dd77f7    ld      (ix-#09),a
2fe0  2116f5    ld      hl,#f516
2fe3  e5        push    hl
2fe4  21d4f0    ld      hl,#f0d4
2fe7  1135f9    ld      de,#f935
2fea  ff        rst     #38
2feb  2135f9    ld      hl,#f935
2fee  e5        push    hl
2fef  2198f1    ld      hl,#f198
2ff2  e5        push    hl
2ff3  cd23be    call    #be23
2ff6  212af5    ld      hl,#f52a
2ff9  e5        push    hl
2ffa  cdd4bd    call    #bdd4
2ffd  cd03bb    call    #bb03
3000  cd8dba    call    #ba8d
3003  e1        pop     hl
3004  7e        ld      a,(hl)
3005  23        inc     hl
3006  b6        or      (hl)
3007  23        inc     hl
3008  b6        or      (hl)
3009  23        inc     hl
300a  b6        or      (hl)
300b  2808      jr      z,#3015         ; (8)
300d  3e01      ld      a,#01
300f  3210f5    ld      (#f510),a
3012  c3136d    jp      #6d13
3015  97        sub     a
3016  3210f5    ld      (#f510),a
3019  c3136d    jp      #6d13
301c  f7        rst     #30
301d  21f7ff    ld      hl,#fff7
3020  39        add     hl,sp
3021  f9        ld      sp,hl
3022  dd36f800  ld      (ix-#08),#00
3026  3a10f5    ld      a,(#f510)
3029  fe01      cp      #01
302b  2007      jr      nz,#3034        ; (7)
302d  3ab6f0    ld      a,(#f0b6)
3030  87        add     a,a
3031  4f        ld      c,a
3032  1802      jr      #3036           ; (2)
3034  0e40      ld      c,#40
3036  79        ld      a,c
3037  3234f5    ld      (#f534),a
303a  87        add     a,a
303b  9f        sbc     a,a
303c  3235f5    ld      (#f535),a
303f  3233f5    ld      (#f533),a
3042  3232f5    ld      (#f532),a
3045  2132f5    ld      hl,#f532
3048  7e        ld      a,(hl)
3049  23        inc     hl
304a  b6        or      (hl)
304b  23        inc     hl
304c  b6        or      (hl)
304d  23        inc     hl
304e  b6        or      (hl)
304f  caa370    jp      z,#70a3
3052  2142f5    ld      hl,#f542
3055  e5        push    hl
3056  2108f5    ld      hl,#f508
3059  1135f9    ld      de,#f935
305c  ff        rst     #38
305d  2135f9    ld      hl,#f935
3060  e5        push    hl
3061  2132f5    ld      hl,#f532
3064  e5        push    hl
3065  cd23be    call    #be23
3068  df        rst     #18
3069  f1        pop     af
306a  2142f5    ld      hl,#f542
306d  e5        push    hl
306e  2139f1    ld      hl,#f139
3071  e5        push    hl
3072  cdb0ba    call    #bab0
3075  daef70    jp      c,#70ef
3078  2121f1    ld      hl,#f121
307b  e5        push    hl
307c  2142f5    ld      hl,#f542
307f  e5        push    hl
3080  cdb0ba    call    #bab0
3083  daef70    jp      c,#70ef
3086  219cf1    ld      hl,#f19c
3089  e5        push    hl
308a  2108f5    ld      hl,#f508
308d  e5        push    hl
308e  df        rst     #18
308f  f1        pop     af
3090  2e05      ld      l,#05
3092  cd1d8b    call    #8b1d
3095  dd71f7    ld      (ix-#09),c
3098  dd7ef7    ld      a,(ix-#09)
309b  fe02      cp      #02
309d  c20771    jp      nz,#7107
30a0  c34473    jp      #7344
30a3  2136f5    ld      hl,#f536
30a6  e5        push    hl
30a7  210cf5    ld      hl,#f50c
30aa  1135f9    ld      de,#f935
30ad  ff        rst     #38
30ae  2135f9    ld      hl,#f935
30b1  e5        push    hl
30b2  2108f5    ld      hl,#f508
30b5  e5        push    hl
30b6  cdf7bd    call    #bdf7
30b9  df        rst     #18
30ba  f1        pop     af
30bb  2108f5    ld      hl,#f508
30be  e5        push    hl
30bf  2112f5    ld      hl,#f512
30c2  1135f9    ld      de,#f935
30c5  ff        rst     #38
30c6  2135f9    ld      hl,#f935
30c9  e5        push    hl
30ca  cd03bb    call    #bb03
30cd  cd8dba    call    #ba8d
30d0  f1        pop     af
30d1  210cf5    ld      hl,#f50c
30d4  e5        push    hl
30d5  2108f5    ld      hl,#f508
30d8  1135f9    ld      de,#f935
30db  ff        rst     #38
30dc  2135f9    ld      hl,#f935
30df  e5        push    hl
30e0  2136f5    ld      hl,#f536
30e3  e5        push    hl
30e4  cd62ba    call    #ba62
30e7  df        rst     #18
30e8  f1        pop     af
30e9  dd4ef8    ld      c,(ix-#08)
30ec  c372be    jp      #be72
30ef  2132f5    ld      hl,#f532
30f2  e5        push    hl
30f3  1135f9    ld      de,#f935
30f6  ff        rst     #38
30f7  2135f9    ld      hl,#f935
30fa  e5        push    hl
30fb  210100    ld      hl,#0001
30fe  e5        push    hl
30ff  cdb2bc    call    #bcb2
3102  df        rst     #18
3103  f1        pop     af
3104  c34570    jp      #7045
3107  dd7ef8    ld      a,(ix-#08)
310a  ddb6f7    or      (ix-#09)
310d  dd77f8    ld      (ix-#08),a
3110  213ef5    ld      hl,#f53e
3113  e5        push    hl
3114  2198f1    ld      hl,#f198
3117  e5        push    hl
3118  df        rst     #18
3119  f1        pop     af
311a  219cf1    ld      hl,#f19c
311d  e5        push    hl
311e  2142f5    ld      hl,#f542
3121  e5        push    hl
3122  df        rst     #18
3123  f1        pop     af
3124  3a10f5    ld      a,(#f510)
3127  fe01      cp      #01
3129  202a      jr      nz,#3155        ; (42)
312b  2198f1    ld      hl,#f198
312e  e5        push    hl
312f  1135f9    ld      de,#f935
3132  ff        rst     #38
3133  2135f9    ld      hl,#f935
3136  e5        push    hl
3137  cd03bb    call    #bb03
313a  21d4f0    ld      hl,#f0d4
313d  e5        push    hl
313e  cd8dba    call    #ba8d
3141  df        rst     #18
3142  f1        pop     af
3143  2e03      ld      l,#03
3145  cd1d8b    call    #8b1d
3148  dd71f7    ld      (ix-#09),c
314b  dd7ef7    ld      a,(ix-#09)
314e  fe02      cp      #02
3150  2016      jr      nz,#3168        ; (22)
3152  c34473    jp      #7344
3155  2e05      ld      l,#05
3157  cd1d8b    call    #8b1d
315a  dd71f7    ld      (ix-#09),c
315d  dd7ef7    ld      a,(ix-#09)
3160  fe02      cp      #02
3162  c2ee71    jp      nz,#71ee
3165  c34473    jp      #7344
3168  dd7ef8    ld      a,(ix-#08)
316b  ddb6f7    or      (ix-#09)
316e  dd77f8    ld      (ix-#08),a
3171  219cf1    ld      hl,#f19c
3174  e5        push    hl
3175  2108f5    ld      hl,#f508
3178  e5        push    hl
3179  df        rst     #18
317a  f1        pop     af
317b  2e05      ld      l,#05
317d  cd1d8b    call    #8b1d
3180  dd71f7    ld      (ix-#09),c
3183  dd7ef7    ld      a,(ix-#09)
3186  fe02      cp      #02
3188  ca4473    jp      z,#7344
318b  dd7ef8    ld      a,(ix-#08)
318e  ddb6f7    or      (ix-#09)
3191  dd77f8    ld      (ix-#08),a
3194  213ef5    ld      hl,#f53e
3197  e5        push    hl
3198  2198f1    ld      hl,#f198
319b  e5        push    hl
319c  cdd9ba    call    #bad9
319f  caef70    jp      z,#70ef
31a2  2112f5    ld      hl,#f512
31a5  e5        push    hl
31a6  2132f5    ld      hl,#f532
31a9  e5        push    hl
31aa  cdd4bd    call    #bdd4
31ad  f1        pop     af
31ae  2e0d      ld      l,#0d
31b0  cd1d8b    call    #8b1d
31b3  dd71f7    ld      (ix-#09),c
31b6  dd7ef7    ld      a,(ix-#09)
31b9  fe02      cp      #02
31bb  ca4473    jp      z,#7344
31be  dd7ef8    ld      a,(ix-#08)
31c1  ddb6f7    or      (ix-#09)
31c4  dd77f8    ld      (ix-#08),a
31c7  2116f5    ld      hl,#f516
31ca  e5        push    hl
31cb  2147f3    ld      hl,#f347
31ce  1135f9    ld      de,#f935
31d1  ff        rst     #38
31d2  2135f9    ld      hl,#f935
31d5  e5        push    hl
31d6  cd03bb    call    #bb03
31d9  cd8dba    call    #ba8d
31dc  e1        pop     hl
31dd  7e        ld      a,(hl)
31de  23        inc     hl
31df  b6        or      (hl)
31e0  23        inc     hl
31e1  b6        or      (hl)
31e2  23        inc     hl
31e3  b6        or      (hl)
31e4  c2ef70    jp      nz,#70ef
31e7  97        sub     a
31e8  3210f5    ld      (#f510),a
31eb  c3a370    jp      #70a3
31ee  dd7ef8    ld      a,(ix-#08)
31f1  ddb6f7    or      (ix-#09)
31f4  dd77f8    ld      (ix-#08),a
31f7  213ef5    ld      hl,#f53e
31fa  e5        push    hl
31fb  2198f1    ld      hl,#f198
31fe  e5        push    hl
31ff  cdd9ba    call    #bad9
3202  c2ef70    jp      nz,#70ef
3205  3a10f5    ld      a,(#f510)
3208  fe03      cp      #03
320a  c26d72    jp      nz,#726d
320d  2112f5    ld      hl,#f512
3210  e5        push    hl
3211  2132f5    ld      hl,#f532
3214  e5        push    hl
3215  cdd4bd    call    #bdd4
3218  f1        pop     af
3219  2142f5    ld      hl,#f542
321c  e5        push    hl
321d  2108f5    ld      hl,#f508
3220  1135f9    ld      de,#f935
3223  ff        rst     #38
3224  2135f9    ld      hl,#f935
3227  e5        push    hl
3228  3ab6f0    ld      a,(#f0b6)
322b  323ff9    ld      (#f93f),a
322e  87        add     a,a
322f  9f        sbc     a,a
3230  3240f9    ld      (#f940),a
3233  323ef9    ld      (#f93e),a
3236  323df9    ld      (#f93d),a
3239  213df9    ld      hl,#f93d
323c  e5        push    hl
323d  cd62ba    call    #ba62
3240  df        rst     #18
3241  f1        pop     af
3242  3ab6f0    ld      a,(#f0b6)
3245  dd77f9    ld      (ix-#07),a
3248  dd7ef9    ld      a,(ix-#07)
324b  fe40      cp      #40
324d  f2ef70    jp      p,#70ef
3250  219cf1    ld      hl,#f19c
3253  e5        push    hl
3254  2142f5    ld      hl,#f542
3257  e5        push    hl
3258  df        rst     #18
3259  f1        pop     af
325a  2e05      ld      l,#05
325c  cd1d8b    call    #8b1d
325f  dd71f7    ld      (ix-#09),c
3262  dd7ef7    ld      a,(ix-#09)
3265  fe02      cp      #02
3267  c2c272    jp      nz,#72c2
326a  c34473    jp      #7344
326d  2198f1    ld      hl,#f198
3270  e5        push    hl
3271  1135f9    ld      de,#f935
3274  ff        rst     #38
3275  2135f9    ld      hl,#f935
3278  e5        push    hl
3279  cd03bb    call    #bb03
327c  21d4f0    ld      hl,#f0d4
327f  e5        push    hl
3280  cd8dba    call    #ba8d
3283  df        rst     #18
3284  f1        pop     af
3285  2e03      ld      l,#03
3287  cd1d8b    call    #8b1d
328a  dd71f7    ld      (ix-#09),c
328d  dd7ef7    ld      a,(ix-#09)
3290  fe02      cp      #02
3292  c22273    jp      nz,#7322
3295  c34473    jp      #7344
3298  21b6f0    ld      hl,#f0b6
329b  dd7ef9    ld      a,(ix-#07)
329e  86        add     a,(hl)
329f  dd77f9    ld      (ix-#07),a
32a2  2142f5    ld      hl,#f542
32a5  e5        push    hl
32a6  3ab6f0    ld      a,(#f0b6)
32a9  3237f9    ld      (#f937),a
32ac  87        add     a,a
32ad  9f        sbc     a,a
32ae  3238f9    ld      (#f938),a
32b1  3236f9    ld      (#f936),a
32b4  3235f9    ld      (#f935),a
32b7  2135f9    ld      hl,#f935
32ba  e5        push    hl
32bb  cd62ba    call    #ba62
32be  f1        pop     af
32bf  c34872    jp      #7248
32c2  dd7ef8    ld      a,(ix-#08)
32c5  ddb6f7    or      (ix-#09)
32c8  dd77f8    ld      (ix-#08),a
32cb  213ef5    ld      hl,#f53e
32ce  e5        push    hl
32cf  2198f1    ld      hl,#f198
32d2  e5        push    hl
32d3  df        rst     #18
32d4  f1        pop     af
32d5  219cf1    ld      hl,#f19c
32d8  e5        push    hl
32d9  2142f5    ld      hl,#f542
32dc  1135f9    ld      de,#f935
32df  ff        rst     #38
32e0  2135f9    ld      hl,#f935
32e3  e5        push    hl
32e4  2132f5    ld      hl,#f532
32e7  e5        push    hl
32e8  cd23be    call    #be23
32eb  df        rst     #18
32ec  f1        pop     af
32ed  2e05      ld      l,#05
32ef  cd1d8b    call    #8b1d
32f2  dd71f7    ld      (ix-#09),c
32f5  dd7ef7    ld      a,(ix-#09)
32f8  fe02      cp      #02
32fa  2848      jr      z,#3344         ; (72)
32fc  dd7ef8    ld      a,(ix-#08)
32ff  ddb6f7    or      (ix-#09)
3302  dd77f8    ld      (ix-#08),a
3305  213ef5    ld      hl,#f53e
3308  e5        push    hl
3309  2198f1    ld      hl,#f198
330c  e5        push    hl
330d  cdd9ba    call    #bad9
3310  ca9872    jp      z,#7298
3313  2112f5    ld      hl,#f512
3316  e5        push    hl
3317  2132f5    ld      hl,#f532
331a  e5        push    hl
331b  cd23be    call    #be23
331e  f1        pop     af
331f  c3ef70    jp      #70ef
3322  dd7ef8    ld      a,(ix-#08)
3325  ddb6f7    or      (ix-#09)
3328  dd77f8    ld      (ix-#08),a
332b  219cf1    ld      hl,#f19c
332e  e5        push    hl
332f  2108f5    ld      hl,#f508
3332  e5        push    hl
3333  df        rst     #18
3334  f1        pop     af
3335  2e05      ld      l,#05
3337  cd1d8b    call    #8b1d
333a  dd71f7    ld      (ix-#09),c
333d  dd7ef7    ld      a,(ix-#09)
3340  fe02      cp      #02
3342  2005      jr      nz,#3349        ; (5)
3344  0e02      ld      c,#02
3346  c372be    jp      #be72
3349  dd7ef8    ld      a,(ix-#08)
334c  ddb6f7    or      (ix-#09)
334f  dd77f8    ld      (ix-#08),a
3352  213ef5    ld      hl,#f53e
3355  e5        push    hl
3356  2198f1    ld      hl,#f198
3359  e5        push    hl
335a  cdd9ba    call    #bad9
335d  caef70    jp      z,#70ef
3360  2112f5    ld      hl,#f512
3363  e5        push    hl
3364  2132f5    ld      hl,#f532
3367  e5        push    hl
3368  cdd4bd    call    #bdd4
336b  f1        pop     af
336c  c3ef70    jp      #70ef
336f  f7        rst     #30
3370  2ec0      ld      l,#c0
3372  cd5cba    call    #ba5c
3375  79        ld      a,c
3376  e6ef      and     #ef
3378  4f        ld      c,a
3379  78        ld      a,b
337a  e6ff      and     #ff
337c  47        ld      b,a
337d  c5        push    bc
337e  2ec0      ld      l,#c0
3380  cd62be    call    #be62
3383  2ec0      ld      l,#c0
3385  cd5cba    call    #ba5c
3388  79        ld      a,c
3389  f610      or      #10
338b  4f        ld      c,a
338c  c5        push    bc
338d  2ec0      ld      l,#c0
338f  cd62be    call    #be62
3392  c372be    jp      #be72
3395  e7        rst     #20
3396  21f9ff    ld      hl,#fff9
3399  39        add     hl,sp
339a  f9        ld      sp,hl
339b  3a34f1    ld      a,(#f134)
339e  e604      and     #04
33a0  2814      jr      z,#33b6         ; (20)
33a2  dd7e04    ld      a,(ix+#04)
33a5  f640      or      #40
33a7  dd7704    ld      (ix+#04),a
33aa  dd6e04    ld      l,(ix+#04)
33ad  cd7c76    call    #767c
33b0  79        ld      a,c
33b1  b7        or      a
33b2  2031      jr      nz,#33e5        ; (49)
33b4  18f4      jr      #33aa           ; (-12)
33b6  3a26f1    ld      a,(#f126)
33b9  fe7f      cp      #7f
33bb  ca2374    jp      z,#7423
33be  3a26f1    ld      a,(#f126)
33c1  3227f1    ld      (#f127),a
33c4  3e7f      ld      a,#7f
33c6  3226f1    ld      (#f126),a
33c9  dd6e04    ld      l,(ix+#04)
33cc  e5        push    hl
33cd  3a27f1    ld      a,(#f127)
33d0  6f        ld      l,a
33d1  cd9c75    call    #759c
33d4  dd71f9    ld      (ix-#07),c
33d7  dd7ef9    ld      a,(ix-#07)
33da  fe02      cp      #02
33dc  ca4074    jp      z,#7440
33df  dd4ef9    ld      c,(ix-#07)
33e2  c384be    jp      #be84
33e5  dd6e04    ld      l,(ix+#04)
33e8  e5        push    hl
33e9  3a26f1    ld      a,(#f126)
33ec  6f        ld      l,a
33ed  cd9c75    call    #759c
33f0  79        ld      a,c
33f1  fe01      cp      #01
33f3  200f      jr      nz,#3404        ; (15)
33f5  3a26f1    ld      a,(#f126)
33f8  fe45      cp      #45
33fa  2818      jr      z,#3414         ; (24)
33fc  3a26f1    ld      a,(#f126)
33ff  3269e9    ld      (#e969),a
3402  1810      jr      #3414           ; (16)
3404  3a26f1    ld      a,(#f126)
3407  3227f1    ld      (#f127),a
340a  3e7f      ld      a,#7f
340c  3226f1    ld      (#f126),a
340f  0e00      ld      c,#00
3411  c384be    jp      #be84
3414  3e7f      ld      a,#7f
3416  3226f1    ld      (#f126),a
3419  3e45      ld      a,#45
341b  3227f1    ld      (#f127),a
341e  0e01      ld      c,#01
3420  c384be    jp      #be84
3423  3a40f1    ld      a,(#f140)
3426  fe03      cp      #03
3428  c28c74    jp      nz,#748c
342b  dd6e04    ld      l,(ix+#04)
342e  7d        ld      a,l
342f  e680      and     #80
3431  6f        ld      l,a
3432  2811      jr      z,#3445         ; (17)
3434  dd6e04    ld      l,(ix+#04)
3437  cd7c76    call    #767c
343a  79        ld      a,c
343b  b7        or      a
343c  2026      jr      nz,#3464        ; (38)
343e  18f4      jr      #3434           ; (-12)
3440  cd6f73    call    #736f
3443  18de      jr      #3423           ; (-34)
3445  3a34f1    ld      a,(#f134)
3448  e608      and     #08
344a  2031      jr      nz,#347d        ; (49)
344c  cd79ac    call    #ac79
344f  79        ld      a,c
3450  fe02      cp      #02
3452  2029      jr      nz,#347d        ; (41)
3454  3a26f1    ld      a,(#f126)
3457  3227f1    ld      (#f127),a
345a  3e7f      ld      a,#7f
345c  3226f1    ld      (#f126),a
345f  0e01      ld      c,#01
3461  c384be    jp      #be84
3464  3a26f1    ld      a,(#f126)
3467  3227f1    ld      (#f127),a
346a  3e7f      ld      a,#7f
346c  3226f1    ld      (#f126),a
346f  dd6e04    ld      l,(ix+#04)
3472  e5        push    hl
3473  3a27f1    ld      a,(#f127)
3476  6f        ld      l,a
3477  cd9c75    call    #759c
347a  c384be    jp      #be84
347d  2a59f3    ld      hl,(#f359)
3480  e5        push    hl
3481  23        inc     hl
3482  2259f3    ld      (#f359),hl
3485  e1        pop     hl
3486  7e        ld      a,(hl)
3487  3227f1    ld      (#f127),a
348a  1815      jr      #34a1           ; (21)
348c  dd6e04    ld      l,(ix+#04)
348f  cd7c76    call    #767c
3492  79        ld      a,c
3493  b7        or      a
3494  28f6      jr      z,#348c         ; (-10)
3496  3a26f1    ld      a,(#f126)
3499  3227f1    ld      (#f127),a
349c  3e7f      ld      a,#7f
349e  3226f1    ld      (#f126),a
34a1  dd6e04    ld      l,(ix+#04)
34a4  e5        push    hl
34a5  3a27f1    ld      a,(#f127)
34a8  6f        ld      l,a
34a9  cd9c75    call    #759c
34ac  c384be    jp      #be84
34af  05        dec     b
34b0  05        dec     b
34b1  0606      ld      b,#06
34b3  0606      ld      b,#06
34b5  0606      ld      b,#06
34b7  0606      ld      b,#06
34b9  07        rlca    
34ba  07        rlca    
34bb  07        rlca    
34bc  07        rlca    
34bd  07        rlca    
34be  07        rlca    
34bf  00        nop     
34c0  010101    ld      bc,#0101
34c3  02        ld      (bc),a
34c4  02        ld      (bc),a
34c5  02        ld      (bc),a
34c6  02        ld      (bc),a
34c7  02        ld      (bc),a
34c8  02        ld      (bc),a
34c9  03        inc     bc
34ca  04        inc     b
34cb  08        ex      af,af'
34cc  09        add     hl,bc
34cd  0a        ld      a,(bc)
34ce  0b        dec     bc
34cf  0b        dec     bc
34d0  0b        dec     bc
34d1  0b        dec     bc
34d2  0b        dec     bc
34d3  0b        dec     bc
34d4  0c        inc     c
34d5  0e0f      ld      c,#0f
34d7  0d        dec     c
34d8  1012      djnz    #34ec           ; (18)
34da  13        inc     de
34db  14        inc     d
34dc  15        dec     d
34dd  1617      ld      d,#17
34df  1a        ld      a,(de)
34e0  1a        ld      a,(de)
34e1  1b        dec     de
34e2  1b        dec     de
34e3  1b        dec     de
34e4  1b        dec     de
34e5  1b        dec     de
34e6  181c      jr      #3504           ; (28)
34e8  1d        dec     e
34e9  1e1f      ld      e,#1f
34eb  2011      jr      nz,#34fe        ; (17)
34ed  19        add     hl,de
34ee  210000    ld      hl,#0000
34f1  00        nop     
34f2  00        nop     
34f3  1c        inc     e
34f4  220000    ld      (#0000),hl
34f7  00        nop     
34f8  00        nop     
34f9  00        nop     
34fa  00        nop     
34fb  00        nop     
34fc  00        nop     
34fd  00        nop     
34fe  23        inc     hl
34ff  23        inc     hl
3500  07        rlca    
3501  04        inc     b
3502  07        rlca    
3503  02        ld      (bc),a
3504  02        ld      (bc),a
3505  00        nop     
3506  00        nop     
3507  00        nop     
3508  00        nop     
3509  02        ld      (bc),a
350a  00        nop     
350b  07        rlca    
350c  00        nop     
350d  07        rlca    
350e  00        nop     
350f  00        nop     
3510  07        rlca    
3511  04        inc     b
3512  0603      ld      b,#03
3514  03        inc     bc
3515  03        inc     bc
3516  00        nop     
3517  00        nop     
3518  07        rlca    
3519  03        inc     bc
351a  00        nop     
351b  07        rlca    
351c  07        rlca    
351d  07        rlca    
351e  04        inc     b
351f  04        inc     b
3520  07        rlca    
3521  07        rlca    
3522  07        rlca    
3523  010000    ld      bc,#0000
3526  010000    ld      bc,#0000
3529  010000    ld      bc,#0000
352c  010200    ld      bc,#0002
352f  0f        rrca    
3530  02        ld      (bc),a
3531  00        nop     
3532  33        inc     sp
3533  59        ld      e,c
3534  c0        ret     nz

3535  41        ld      b,c
3536  59        ld      e,c
3537  c0        ret     nz

3538  41        ld      b,c
3539  51        ld      d,c
353a  c0        ret     nz

353b  41        ld      b,c
353c  5f        ld      e,a
353d  2029      jr      nz,#3568        ; (41)
353f  5f        ld      e,a
3540  e0        ret     po

3541  29        add     hl,hl
3542  00        nop     
3543  00        nop     
3544  010000    ld      bc,#0000
3547  01202a    ld      bc,#2a20
354a  bd        cp      l
354b  00        nop     
354c  1e01      ld      e,#01
354e  00        nop     
354f  3f        ccf     
3550  bd        cp      l
3551  00        nop     
3552  27        daa     
3553  bd        cp      l
3554  00        nop     
3555  00        nop     
3556  010000    ld      bc,#0000
3559  010000    ld      bc,#0000
355c  010000    ld      bc,#0000
355f  010040    ld      bc,#4000
3562  010000    ld      bc,#0000
3565  014080    ld      bc,#8040
3568  014080    ld      bc,#8040
356b  010000    ld      bc,#0000
356e  010000    ld      bc,#0000
3571  0141c0    ld      bc,#c041
3574  0141c0    ld      bc,#c041
3577  0141c0    ld      bc,#c041
357a  010000    ld      bc,#0000
357d  010000    ld      bc,#0000
3580  010000    ld      bc,#0000
3583  010000    ld      bc,#0000
3586  010000    ld      bc,#0000
3589  010000    ld      bc,#0000
358c  010000    ld      bc,#0000
358f  010301    ld      bc,#0103
3592  02        ld      (bc),a
3593  03        inc     bc
3594  4c        ld      c,h
3595  76        halt    
3596  70        ld      (hl),b
3597  76        halt    
3598  6a        ld      l,d
3599  76        halt    
359a  48        ld      c,b
359b  76        halt    
359c  e7        rst     #20
359d  21f4ff    ld      hl,#fff4
35a0  39        add     hl,sp
35a1  f9        ld      sp,hl
35a2  dd6e04    ld      l,(ix+#04)
35a5  7d        ld      a,l
35a6  e680      and     #80
35a8  6f        ld      l,a
35a9  2805      jr      z,#35b0         ; (5)
35ab  0e00      ld      c,#00
35ad  c38bbe    jp      #be8b
35b0  21af74    ld      hl,#74af
35b3  dd7e04    ld      a,(ix+#04)
35b6  5f        ld      e,a
35b7  87        add     a,a
35b8  9f        sbc     a,a
35b9  57        ld      d,a
35ba  19        add     hl,de
35bb  7e        ld      a,(hl)
35bc  dd77f7    ld      (ix-#09),a
35bf  dd7e06    ld      a,(ix+#06)
35c2  4f        ld      c,a
35c3  87        add     a,a
35c4  9f        sbc     a,a
35c5  47        ld      b,a
35c6  c5        push    bc
35c7  210300    ld      hl,#0003
35ca  e5        push    hl
35cb  cddeb9    call    #b9de
35ce  e1        pop     hl
35cf  7d        ld      a,l
35d0  e603      and     #03
35d2  5f        ld      e,a
35d3  dd73f8    ld      (ix-#08),e
35d6  210100    ld      hl,#0001
35d9  e5        push    hl
35da  2e07      ld      l,#07
35dc  dd4e06    ld      c,(ix+#06)
35df  79        ld      a,c
35e0  e607      and     #07
35e2  4f        ld      c,a
35e3  7d        ld      a,l
35e4  91        sub     c
35e5  6f        ld      l,a
35e6  4f        ld      c,a
35e7  87        add     a,a
35e8  9f        sbc     a,a
35e9  47        ld      b,a
35ea  c5        push    bc
35eb  cdbeb9    call    #b9be
35ee  e1        pop     hl
35ef  5d        ld      e,l
35f0  dd73f9    ld      (ix-#07),e
35f3  dd7ef7    ld      a,(ix-#09)
35f6  4f        ld      c,a
35f7  87        add     a,a
35f8  9f        sbc     a,a
35f9  47        ld      b,a
35fa  69        ld      l,c
35fb  60        ld      h,b
35fc  5d        ld      e,l
35fd  54        ld      d,h
35fe  29        add     hl,hl
35ff  19        add     hl,de
3600  012475    ld      bc,#7524
3603  09        add     hl,bc
3604  dd7ef8    ld      a,(ix-#08)
3607  5f        ld      e,a
3608  87        add     a,a
3609  9f        sbc     a,a
360a  57        ld      d,a
360b  19        add     hl,de
360c  7e        ld      a,(hl)
360d  6f        ld      l,a
360e  dda6f9    and     (ix-#07)
3611  281a      jr      z,#362d         ; (26)
3613  dd36f400  ld      (ix-#0c),#00
3617  3aa0f1    ld      a,(#f1a0)
361a  b7        or      a
361b  c27676    jp      nz,#7676
361e  dd7e04    ld      a,(ix+#04)
3621  fe26      cp      #26
3623  c27676    jp      nz,#7676
3626  dd36f402  ld      (ix-#0c),#02
362a  c37676    jp      #7676
362d  dd6e06    ld      l,(ix+#06)
3630  cb75      bit     6,l
3632  2804      jr      z,#3638         ; (4)
3634  0e01      ld      c,#01
3636  1804      jr      #363c           ; (4)
3638  3a40f1    ld      a,(#f140)
363b  4f        ld      c,a
363c  dd71f6    ld      (ix-#0a),c
363f  dd4ef6    ld      c,(ix-#0a)
3642  219075    ld      hl,#7590
3645  c3edb8    jp      #b8ed
3648  dd36f504  ld      (ix-#0b),#04
364c  210075    ld      hl,#7500
364f  dd7ef7    ld      a,(ix-#09)
3652  5f        ld      e,a
3653  87        add     a,a
3654  9f        sbc     a,a
3655  57        ld      d,a
3656  19        add     hl,de
3657  7e        ld      a,(hl)
3658  6f        ld      l,a
3659  dda6f5    and     (ix-#0b)
365c  2804      jr      z,#3662         ; (4)
365e  0e01      ld      c,#01
3660  1802      jr      #3664           ; (2)
3662  0e02      ld      c,#02
3664  dd71f4    ld      (ix-#0c),c
3667  c31776    jp      #7617
366a  dd36f502  ld      (ix-#0b),#02
366e  18dc      jr      #364c           ; (-36)
3670  dd36f501  ld      (ix-#0b),#01
3674  18d6      jr      #364c           ; (-42)
3676  dd4ef4    ld      c,(ix-#0c)
3679  c38bbe    jp      #be8b
367c  e7        rst     #20
367d  21c7ff    ld      hl,#ffc7
3680  39        add     hl,sp
3681  f9        ld      sp,hl
3682  3a26f1    ld      a,(#f126)
3685  fe7f      cp      #7f
3687  2805      jr      z,#368e         ; (5)
3689  0e01      ld      c,#01
368b  c384be    jp      #be84
368e  2e00      ld      l,#00
3690  cd5cba    call    #ba5c
3693  79        ld      a,c
3694  e680      and     #80
3696  4f        ld      c,a
3697  2030      jr      nz,#36c9        ; (48)
3699  3a40f1    ld      a,(#f140)
369c  dd77f8    ld      (ix-#08),a
369f  3e01      ld      a,#01
36a1  3240f1    ld      (#f140),a
36a4  dde5      push    ix
36a6  c1        pop     bc
36a7  21c7ff    ld      hl,#ffc7
36aa  09        add     hl,bc
36ab  cdba81    call    #81ba
36ae  2e58      ld      l,#58
36b0  cf        rst     #8
36b1  2e46      ld      l,#46
36b3  d7        rst     #10
36b4  cdd0b8    call    #b8d0
36b7  2e00      ld      l,#00
36b9  cd5cba    call    #ba5c
36bc  79        ld      a,c
36bd  e680      and     #80
36bf  4f        ld      c,a
36c0  2033      jr      nz,#36f5        ; (51)
36c2  2e81      ld      l,#81
36c4  cd5cba    call    #ba5c
36c7  18ee      jr      #36b7           ; (-18)
36c9  2e81      ld      l,#81
36cb  cd5cba    call    #ba5c
36ce  cb41      bit     0,c
36d0  2835      jr      z,#3707         ; (53)
36d2  2e80      ld      l,#80
36d4  cd5cba    call    #ba5c
36d7  dd71f9    ld      (ix-#07),c
36da  dd7ef9    ld      a,(ix-#07)
36dd  fe40      cp      #40
36df  fa0c77    jp      m,#770c
36e2  3e43      ld      a,#43
36e4  ddbef9    cp      (ix-#07)
36e7  fa0c77    jp      m,#770c
36ea  dd6ef9    ld      l,(ix-#07)
36ed  cdab99    call    #99ab
36f0  0e00      ld      c,#00
36f2  c384be    jp      #be84
36f5  dde5      push    ix
36f7  c1        pop     bc
36f8  21c7ff    ld      hl,#ffc7
36fb  09        add     hl,bc
36fc  cd2386    call    #8623
36ff  dd7ef8    ld      a,(ix-#08)
3702  3240f1    ld      (#f140),a
3705  18c2      jr      #36c9           ; (-62)
3707  0e00      ld      c,#00
3709  c384be    jp      #be84
370c  dd7ef9    ld      a,(ix-#07)
370f  fe1b      cp      #1b
3711  2007      jr      nz,#371a        ; (7)
3713  cdc5b5    call    #b5c5
3716  79        ld      a,c
3717  b7        or      a
3718  200e      jr      nz,#3728        ; (14)
371a  dd7ef9    ld      a,(ix-#07)
371d  fe1a      cp      #1a
371f  200c      jr      nz,#372d        ; (12)
3721  cd1fb6    call    #b61f
3724  79        ld      a,c
3725  b7        or      a
3726  2805      jr      z,#372d         ; (5)
3728  0e00      ld      c,#00
372a  c384be    jp      #be84
372d  dd6e04    ld      l,(ix+#04)
3730  e5        push    hl
3731  dd6ef9    ld      l,(ix-#07)
3734  cd9c75    call    #759c
3737  dd71f7    ld      (ix-#09),c
373a  dd7ef7    ld      a,(ix-#09)
373d  fe02      cp      #02
373f  2823      jr      z,#3764         ; (35)
3741  3a40f1    ld      a,(#f140)
3744  fe03      cp      #03
3746  2024      jr      nz,#376c        ; (36)
3748  3a34f1    ld      a,(#f134)
374b  e604      and     #04
374d  201d      jr      nz,#376c        ; (29)
374f  3ab7f0    ld      a,(#f0b7)
3752  fe10      cp      #10
3754  2016      jr      nz,#376c        ; (22)
3756  dd7ef9    ld      a,(ix-#07)
3759  fe26      cp      #26
375b  2807      jr      z,#3764         ; (7)
375d  dd7ef7    ld      a,(ix-#09)
3760  fe01      cp      #01
3762  2008      jr      nz,#376c        ; (8)
3764  cd6f73    call    #736f
3767  0e00      ld      c,#00
3769  c384be    jp      #be84
376c  dd7ef9    ld      a,(ix-#07)
376f  3226f1    ld      (#f126),a
3772  0e01      ld      c,#01
3774  c384be    jp      #be84
3777  00        nop     
3778  214263    ld      hl,#6342
377b  63        ld      h,e
377c  04        inc     b
377d  04        inc     b
377e  25        dec     h
377f  260a      ld      h,#0a
3781  67        ld      h,a
3782  67        ld      h,a
3783  08        ex      af,af'
3784  24        inc     h
3785  44        ld      b,h
3786  69        ld      l,c
3787  0a        ld      a,(bc)
3788  44        ld      b,h
3789  44        ld      b,h
378a  08        ex      af,af'
378b  69        ld      l,c
378c  65        ld      h,l
378d  64        ld      h,h
378e  0a        ld      a,(bc)
378f  6b        ld      l,e
3790  8c        adc     a,h
3791  08        ex      af,af'
3792  64        ld      h,h
3793  84        add     a,h
3794  b2        or      d
3795  c28484    jp      nz,#8484
3798  08        ex      af,af'
3799  84        add     a,h
379a  6d        ld      l,l
379b  ae        xor     (hl)
379c  0a        ld      a,(bc)
379d  6f        ld      l,a
379e  70        ld      (hl),b
379f  08        ex      af,af'
37a0  a4        and     h
37a1  c4710a    call    nz,#0a71
37a4  c4c408    call    nz,#08c4
37a7  71        ld      (hl),c
37a8  00        nop     
37a9  214263    ld      hl,#6342
37ac  63        ld      h,e
37ad  04        inc     b
37ae  05        dec     b
37af  0621      ld      b,#21
37b1  24        inc     h
37b2  67        ld      h,a
37b3  67        ld      h,a
37b4  08        ex      af,af'
37b5  25        dec     h
37b6  45        ld      b,l
37b7  69        ld      l,c
37b8  04        inc     b
37b9  45        ld      b,l
37ba  45        ld      b,l
37bb  08        ex      af,af'
37bc  69        ld      l,c
37bd  0665      ld      b,#65
37bf  04        inc     b
37c0  61        ld      h,c
37c1  81        add     a,c
37c2  08        ex      af,af'
37c3  65        ld      h,l
37c4  85        add     a,l
37c5  a1        and     c
37c6  c1        pop     bc
37c7  85        add     a,l
37c8  85        add     a,l
37c9  08        ex      af,af'
37ca  85        add     a,l
37cb  06a1      ld      b,#a1
37cd  04        inc     b
37ce  67        ld      h,a
37cf  67        ld      h,a
37d0  08        ex      af,af'
37d1  a5        and     l
37d2  c5        push    bc
37d3  69        ld      l,c
37d4  04        inc     b
37d5  c5        push    bc
37d6  c5        push    bc
37d7  08        ex      af,af'
37d8  69        ld      l,c
37d9  0a        ld      a,(bc)
37da  00        nop     
37db  010203    ld      bc,#0302
37de  04        inc     b
37df  05        dec     b
37e0  0607      ld      b,#07
37e2  08        ex      af,af'
37e3  09        add     hl,bc
37e4  6c        ld      l,h
37e5  79        ld      a,c
37e6  03        inc     bc
37e7  7a        ld      a,d
37e8  fd79      ld      a,c
37ea  e479bb    call    po,#bb79
37ed  79        ld      a,c
37ee  b5        or      l
37ef  79        ld      a,c
37f0  ab        xor     e
37f1  79        ld      a,c
37f2  85        add     a,l
37f3  79        ld      a,c
37f4  6e        ld      l,(hl)
37f5  79        ld      a,c
37f6  52        ld      d,d
37f7  79        ld      a,c
37f8  2179ff    ld      hl,#ff79
37fb  0f        rrca    
37fc  ff        rst     #38
37fd  ff        rst     #38
37fe  05        dec     b
37ff  34        inc     (hl)
3800  35        dec     (hl)
3801  3632      ld      (hl),#32
3803  33        inc     sp
3804  fc7b49    call    m,#497b
3807  7c        ld      a,h
3808  3a7c27    ld      a,(#277c)
380b  7c        ld      a,h
380c  05        dec     b
380d  7c        ld      a,h
380e  dc7b13    call    c,#137b
3811  00        nop     
3812  010203    ld      bc,#0302
3815  04        inc     b
3816  05        dec     b
3817  0607      ld      b,#07
3819  08        ex      af,af'
381a  09        add     hl,bc
381b  0a        ld      a,(bc)
381c  0b        dec     bc
381d  0c        inc     c
381e  0d        dec     c
381f  0e0f      ld      c,#0f
3821  1011      djnz    #3834           ; (17)
3823  12        ld      (de),a
3824  56        ld      d,(hl)
3825  7a        ld      a,d
3826  37        scf     
3827  7d        ld      a,l
3828  12        ld      (de),a
3829  7d        ld      a,l
382a  00        nop     
382b  7d        ld      a,l
382c  f47cab    call    p,#ab7c
382f  7c        ld      a,h
3830  73        ld      (hl),e
3831  7c        ld      a,h
3832  58        ld      e,b
3833  7c        ld      a,h
3834  d1        pop     de
3835  7b        ld      a,e
3836  c7        rst     #0
3837  7b        ld      a,e
3838  a8        xor     b
3839  7b        ld      a,e
383a  95        sub     l
383b  7b        ld      a,e
383c  75        ld      (hl),l
383d  7b        ld      a,e
383e  12        ld      (de),a
383f  7b        ld      a,e
3840  c67a      add     a,#7a
3842  c0        ret     nz

3843  7a        ld      a,d
3844  8a        adc     a,d
3845  7a        ld      a,d
3846  72        ld      (hl),d
3847  7a        ld      a,d
3848  59        ld      e,c
3849  7a        ld      a,d
384a  0e7a      ld      c,#7a
384c  e7        rst     #20
384d  21f1ff    ld      hl,#fff1
3850  39        add     hl,sp
3851  f9        ld      sp,hl
3852  dd36f200  ld      (ix-#0e),#00
3856  dd6e08    ld      l,(ix+#08)
3859  7d        ld      a,l
385a  e603      and     #03
385c  c607      add     a,#07
385e  6f        ld      l,a
385f  dd75f5    ld      (ix-#0b),l
3862  dd6e08    ld      l,(ix+#08)
3865  cb5d      bit     3,l
3867  2804      jr      z,#386d         ; (4)
3869  0e01      ld      c,#01
386b  1802      jr      #386f           ; (2)
386d  0e00      ld      c,#00
386f  dd71f4    ld      (ix-#0c),c
3872  dd6e08    ld      l,(ix+#08)
3875  cb55      bit     2,l
3877  2804      jr      z,#387d         ; (4)
3879  0e01      ld      c,#01
387b  1802      jr      #387f           ; (2)
387d  0e00      ld      c,#00
387f  dd71f6    ld      (ix-#0a),c
3882  3a40f1    ld      a,(#f140)
3885  fe02      cp      #02
3887  201b      jr      nz,#38a4        ; (27)
3889  dd6e04    ld      l,(ix+#04)
388c  dd6605    ld      h,(ix+#05)
388f  0160f1    ld      bc,#f160
3892  7d        ld      a,l
3893  91        sub     c
3894  6f        ld      l,a
3895  7c        ld      a,h
3896  98        sbc     a,b
3897  67        ld      h,a
3898  e5        push    hl
3899  210400    ld      hl,#0004
389c  e5        push    hl
389d  cd6cb9    call    #b96c
38a0  e1        pop     hl
38a1  dd75f7    ld      (ix-#09),l
38a4  2e60      ld      l,#60
38a6  d7        rst     #10
38a7  2e5b      ld      l,#5b
38a9  cf        rst     #8
38aa  dd6ef5    ld      l,(ix-#0b)
38ad  cd9573    call    #7395
38b0  79        ld      a,c
38b1  fe01      cp      #01
38b3  200a      jr      nz,#38bf        ; (10)
38b5  cde6b8    call    #b8e6
38b8  0e00      ld      c,#00
38ba  3e0a      ld      a,#0a
38bc  c39cbe    jp      #be9c
38bf  dd6e06    ld      l,(ix+#06)
38c2  cd507d    call    #7d50
38c5  dd71f1    ld      (ix-#0f),c
38c8  3a40f1    ld      a,(#f140)
38cb  fe02      cp      #02
38cd  2029      jr      nz,#38f8        ; (41)
38cf  dd4ef2    ld      c,(ix-#0e)
38d2  97        sub     a
38d3  47        ld      b,a
38d4  69        ld      l,c
38d5  60        ld      h,b
38d6  5d        ld      e,l
38d7  54        ld      d,h
38d8  29        add     hl,hl
38d9  19        add     hl,de
38da  29        add     hl,hl
38db  19        add     hl,de
38dc  01a877    ld      bc,#77a8
38df  09        add     hl,bc
38e0  dd5ef1    ld      e,(ix-#0f)
38e3  97        sub     a
38e4  57        ld      d,a
38e5  19        add     hl,de
38e6  7e        ld      a,(hl)
38e7  dd77f9    ld      (ix-#07),a
38ea  dd6ef9    ld      l,(ix-#07)
38ed  7d        ld      a,l
38ee  e61f      and     #1f
38f0  6f        ld      l,a
38f1  4d        ld      c,l
38f2  21d977    ld      hl,#77d9
38f5  c3edb8    jp      #b8ed
38f8  dd4ef2    ld      c,(ix-#0e)
38fb  97        sub     a
38fc  47        ld      b,a
38fd  69        ld      l,c
38fe  60        ld      h,b
38ff  5d        ld      e,l
3900  54        ld      d,h
3901  29        add     hl,hl
3902  19        add     hl,de
3903  29        add     hl,hl
3904  19        add     hl,de
3905  017777    ld      bc,#7777
3908  09        add     hl,bc
3909  dd5ef1    ld      e,(ix-#0f)
390c  97        sub     a
390d  57        ld      d,a
390e  19        add     hl,de
390f  7e        ld      a,(hl)
3910  dd77f9    ld      (ix-#07),a
3913  dd6ef9    ld      l,(ix-#07)
3916  7d        ld      a,l
3917  e61f      and     #1f
3919  6f        ld      l,a
391a  4d        ld      c,l
391b  211078    ld      hl,#7810
391e  c3edb8    jp      #b8ed
3921  dd7ef4    ld      a,(ix-#0c)
3924  b7        or      a
3925  2806      jr      z,#392d         ; (6)
3927  dd36f302  ld      (ix-#0d),#02
392b  180e      jr      #393b           ; (14)
392d  2e38      ld      l,#38
392f  d7        rst     #10
3930  dd6ef7    ld      l,(ix-#09)
3933  d7        rst     #10
3934  2e63      ld      l,#63
3936  d7        rst     #10
3937  dd36f301  ld      (ix-#0d),#01
393b  3a27f1    ld      a,(#f127)
393e  fe1c      cp      #1c
3940  2005      jr      nz,#3947        ; (5)
3942  3a27f1    ld      a,(#f127)
3945  6f        ld      l,a
3946  d7        rst     #10
3947  2e5c      ld      l,#5c
3949  cf        rst     #8
394a  dd4ef3    ld      c,(ix-#0d)
394d  3e0a      ld      a,#0a
394f  c39cbe    jp      #be9c
3952  3a27f1    ld      a,(#f127)
3955  6f        ld      l,a
3956  d7        rst     #10
3957  dd4ef9    ld      c,(ix-#07)
395a  97        sub     a
395b  47        ld      b,a
395c  c5        push    bc
395d  210500    ld      hl,#0005
3960  e5        push    hl
3961  cddeb9    call    #b9de
3964  e1        pop     hl
3965  5d        ld      e,l
3966  dd73f2    ld      (ix-#0e),e
3969  c3aa78    jp      #78aa
396c  18e9      jr      #3957           ; (-23)
396e  dd7ef6    ld      a,(ix-#0a)
3971  b7        or      a
3972  280a      jr      z,#397e         ; (10)
3974  cde6b8    call    #b8e6
3977  0e00      ld      c,#00
3979  3e0a      ld      a,#0a
397b  c39cbe    jp      #be9c
397e  3a27f1    ld      a,(#f127)
3981  6f        ld      l,a
3982  d7        rst     #10
3983  18d2      jr      #3957           ; (-46)
3985  dd7ef6    ld      a,(ix-#0a)
3988  b7        or      a
3989  2006      jr      nz,#3991        ; (6)
398b  dd7ef4    ld      a,(ix-#0c)
398e  b7        or      a
398f  280a      jr      z,#399b         ; (10)
3991  cd6f73    call    #736f
3994  dd36f900  ld      (ix-#07),#00
3998  c35779    jp      #7957
399b  2e38      ld      l,#38
399d  d7        rst     #10
399e  dd6ef7    ld      l,(ix-#09)
39a1  d7        rst     #10
39a2  2e63      ld      l,#63
39a4  d7        rst     #10
39a5  cde6b8    call    #b8e6
39a8  c35779    jp      #7957
39ab  cde6b8    call    #b8e6
39ae  0e00      ld      c,#00
39b0  3e0a      ld      a,#0a
39b2  c39cbe    jp      #be9c
39b5  cd6f73    call    #736f
39b8  c35779    jp      #7957
39bb  dd7ef2    ld      a,(ix-#0e)
39be  fe03      cp      #03
39c0  2813      jr      z,#39d5         ; (19)
39c2  2e63      ld      l,#63
39c4  d7        rst     #10
39c5  dd7ef4    ld      a,(ix-#0c)
39c8  b7        or      a
39c9  280a      jr      z,#39d5         ; (10)
39cb  3a27f1    ld      a,(#f127)
39ce  fe1c      cp      #1c
39d0  2003      jr      nz,#39d5        ; (3)
39d2  2e5a      ld      l,#5a
39d4  cf        rst     #8
39d5  3a27f1    ld      a,(#f127)
39d8  6f        ld      l,a
39d9  d7        rst     #10
39da  2e5c      ld      l,#5c
39dc  cf        rst     #8
39dd  0e01      ld      c,#01
39df  3e0a      ld      a,#0a
39e1  c39cbe    jp      #be9c
39e4  dd7ef6    ld      a,(ix-#0a)
39e7  b7        or      a
39e8  280a      jr      z,#39f4         ; (10)
39ea  cd6f73    call    #736f
39ed  dd36f920  ld      (ix-#07),#20
39f1  c35779    jp      #7957
39f4  2e63      ld      l,#63
39f6  d7        rst     #10
39f7  cde6b8    call    #b8e6
39fa  c35779    jp      #7957
39fd  2e59      ld      l,#59
39ff  cf        rst     #8
3a00  c35779    jp      #7957
3a03  3a27f1    ld      a,(#f127)
3a06  6f        ld      l,a
3a07  d7        rst     #10
3a08  2e63      ld      l,#63
3a0a  d7        rst     #10
3a0b  c35779    jp      #7957
3a0e  dd7ef4    ld      a,(ix-#0c)
3a11  b7        or      a
3a12  280a      jr      z,#3a1e         ; (10)
3a14  2e5c      ld      l,#5c
3a16  cf        rst     #8
3a17  0e02      ld      c,#02
3a19  3e0a      ld      a,#0a
3a1b  c39cbe    jp      #be9c
3a1e  213bf3    ld      hl,#f33b
3a21  e5        push    hl
3a22  dd6e04    ld      l,(ix+#04)
3a25  dd6605    ld      h,(ix+#05)
3a28  e5        push    hl
3a29  df        rst     #18
3a2a  f1        pop     af
3a2b  dd6e06    ld      l,(ix+#06)
3a2e  cdb17d    call    #7db1
3a31  dd6e0c    ld      l,(ix+#0c)
3a34  dd660d    ld      h,(ix+#0d)
3a37  e5        push    hl
3a38  dd6e0a    ld      l,(ix+#0a)
3a3b  dd660b    ld      h,(ix+#0b)
3a3e  cd147e    call    #7e14
3a41  79        ld      a,c
3a42  b7        or      a
3a43  280a      jr      z,#3a4f         ; (10)
3a45  2e5c      ld      l,#5c
3a47  cf        rst     #8
3a48  0e01      ld      c,#01
3a4a  3e0a      ld      a,#0a
3a4c  c39cbe    jp      #be9c
3a4f  dd36f960  ld      (ix-#07),#60
3a53  c35779    jp      #7957
3a56  c35779    jp      #7957
3a59  3a27f1    ld      a,(#f127)
3a5c  6f        ld      l,a
3a5d  d7        rst     #10
3a5e  3a27f1    ld      a,(#f127)
3a61  323df3    ld      (#f33d),a
3a64  87        add     a,a
3a65  9f        sbc     a,a
3a66  323ef3    ld      (#f33e),a
3a69  323cf3    ld      (#f33c),a
3a6c  323bf3    ld      (#f33b),a
3a6f  c35779    jp      #7957
3a72  dd7ef6    ld      a,(ix-#0a)
3a75  b7        or      a
3a76  280a      jr      z,#3a82         ; (10)
3a78  cde6b8    call    #b8e6
3a7b  0e00      ld      c,#00
3a7d  3e0a      ld      a,#0a
3a7f  c39cbe    jp      #be9c
3a82  3a27f1    ld      a,(#f127)
3a85  6f        ld      l,a
3a86  d7        rst     #10
3a87  c35779    jp      #7957
3a8a  dd7ef6    ld      a,(ix-#0a)
3a8d  b7        or      a
3a8e  2006      jr      nz,#3a96        ; (6)
3a90  dd7ef4    ld      a,(ix-#0c)
3a93  b7        or      a
3a94  280a      jr      z,#3aa0         ; (10)
3a96  cd6f73    call    #736f
3a99  dd36f900  ld      (ix-#07),#00
3a9d  c35779    jp      #7957
3aa0  213bf3    ld      hl,#f33b
3aa3  e5        push    hl
3aa4  dd6e04    ld      l,(ix+#04)
3aa7  dd6605    ld      h,(ix+#05)
3aaa  e5        push    hl
3aab  df        rst     #18
3aac  f1        pop     af
3aad  dd7ef1    ld      a,(ix-#0f)
3ab0  fe04      cp      #04
3ab2  2006      jr      nz,#3aba        ; (6)
3ab4  dd6e06    ld      l,(ix+#06)
3ab7  cdb17d    call    #7db1
3aba  cde6b8    call    #b8e6
3abd  c35779    jp      #7957
3ac0  cd6f73    call    #736f
3ac3  c35779    jp      #7957
3ac6  dd6e0c    ld      l,(ix+#0c)
3ac9  dd660d    ld      h,(ix+#0d)
3acc  e5        push    hl
3acd  dd6e0a    ld      l,(ix+#0a)
3ad0  dd660b    ld      h,(ix+#0b)
3ad3  cd147e    call    #7e14
3ad6  79        ld      a,c
3ad7  b7        or      a
3ad8  ca5779    jp      z,#7957
3adb  dd6e04    ld      l,(ix+#04)
3ade  dd6605    ld      h,(ix+#05)
3ae1  e5        push    hl
3ae2  213bf3    ld      hl,#f33b
3ae5  e5        push    hl
3ae6  df        rst     #18
3ae7  f1        pop     af
3ae8  2e5c      ld      l,#5c
3aea  cf        rst     #8
3aeb  dd7ef2    ld      a,(ix-#0e)
3aee  fe01      cp      #01
3af0  2009      jr      nz,#3afb        ; (9)
3af2  dd7ef4    ld      a,(ix-#0c)
3af5  b7        or      a
3af6  2003      jr      nz,#3afb        ; (3)
3af8  2e63      ld      l,#63
3afa  d7        rst     #10
3afb  dd7ef2    ld      a,(ix-#0e)
3afe  fe03      cp      #03
3b00  2009      jr      nz,#3b0b        ; (9)
3b02  dd7ef4    ld      a,(ix-#0c)
3b05  b7        or      a
3b06  2803      jr      z,#3b0b         ; (3)
3b08  2e5a      ld      l,#5a
3b0a  cf        rst     #8
3b0b  0e01      ld      c,#01
3b0d  3e0a      ld      a,#0a
3b0f  c39cbe    jp      #be9c
3b12  21fa77    ld      hl,#77fa
3b15  e5        push    hl
3b16  213bf3    ld      hl,#f33b
3b19  e5        push    hl
3b1a  cdb0ba    call    #bab0
3b1d  300d      jr      nc,#3b2c        ; (13)
3b1f  214104    ld      hl,#0441
3b22  e5        push    hl
3b23  213d04    ld      hl,#043d
3b26  cd147e    call    #7e14
3b29  c35779    jp      #7957
3b2c  213bf3    ld      hl,#f33b
3b2f  e5        push    hl
3b30  dde5      push    ix
3b32  c1        pop     bc
3b33  210600    ld      hl,#0006
3b36  09        add     hl,bc
3b37  4d        ld      c,l
3b38  44        ld      b,h
3b39  97        sub     a
3b3a  3235f9    ld      (#f935),a
3b3d  3236f9    ld      (#f936),a
3b40  0a        ld      a,(bc)
3b41  3237f9    ld      (#f937),a
3b44  97        sub     a
3b45  3238f9    ld      (#f938),a
3b48  2135f9    ld      hl,#f935
3b4b  e5        push    hl
3b4c  cd3ebd    call    #bd3e
3b4f  f1        pop     af
3b50  213bf3    ld      hl,#f33b
3b53  e5        push    hl
3b54  3a27f1    ld      a,(#f127)
3b57  3237f9    ld      (#f937),a
3b5a  87        add     a,a
3b5b  9f        sbc     a,a
3b5c  3238f9    ld      (#f938),a
3b5f  3236f9    ld      (#f936),a
3b62  3235f9    ld      (#f935),a
3b65  2135f9    ld      hl,#f935
3b68  e5        push    hl
3b69  cd62ba    call    #ba62
3b6c  f1        pop     af
3b6d  3a27f1    ld      a,(#f127)
3b70  6f        ld      l,a
3b71  d7        rst     #10
3b72  c35779    jp      #7957
3b75  dd7ef6    ld      a,(ix-#0a)
3b78  b7        or      a
3b79  280a      jr      z,#3b85         ; (10)
3b7b  cd6f73    call    #736f
3b7e  dd36f920  ld      (ix-#07),#20
3b82  c35779    jp      #7957
3b85  dd7ef1    ld      a,(ix-#0f)
3b88  fe04      cp      #04
3b8a  2003      jr      nz,#3b8f        ; (3)
3b8c  2e63      ld      l,#63
3b8e  d7        rst     #10
3b8f  cde6b8    call    #b8e6
3b92  c35779    jp      #7957
3b95  2e59      ld      l,#59
3b97  cf        rst     #8
3b98  97        sub     a
3b99  323bf3    ld      (#f33b),a
3b9c  323cf3    ld      (#f33c),a
3b9f  323df3    ld      (#f33d),a
3ba2  323ef3    ld      (#f33e),a
3ba5  c35779    jp      #7957
3ba8  213bf3    ld      hl,#f33b
3bab  e5        push    hl
3bac  3a27f1    ld      a,(#f127)
3baf  4f        ld      c,a
3bb0  87        add     a,a
3bb1  9f        sbc     a,a
3bb2  47        ld      b,a
3bb3  69        ld      l,c
3bb4  60        ld      h,b
3bb5  29        add     hl,hl
3bb6  29        add     hl,hl
3bb7  0160f1    ld      bc,#f160
3bba  09        add     hl,bc
3bbb  e5        push    hl
3bbc  df        rst     #18
3bbd  f1        pop     af
3bbe  dd6e06    ld      l,(ix+#06)
3bc1  cdb17d    call    #7db1
3bc4  c35779    jp      #7957
3bc7  cde6b8    call    #b8e6
3bca  0e00      ld      c,#00
3bcc  3e0a      ld      a,#0a
3bce  c39cbe    jp      #be9c
3bd1  3a27f1    ld      a,(#f127)
3bd4  6f        ld      l,a
3bd5  4d        ld      c,l
3bd6  21fe77    ld      hl,#77fe
3bd9  c3edb8    jp      #b8ed
3bdc  213bf3    ld      hl,#f33b
3bdf  e5        push    hl
3be0  3e00      ld      a,#00
3be2  87        add     a,a
3be3  9f        sbc     a,a
3be4  3235f9    ld      (#f935),a
3be7  3236f9    ld      (#f936),a
3bea  3e00      ld      a,#00
3bec  3238f9    ld      (#f938),a
3bef  3e01      ld      a,#01
3bf1  3237f9    ld      (#f937),a
3bf4  2135f9    ld      hl,#f935
3bf7  e5        push    hl
3bf8  cd62ba    call    #ba62
3bfb  f1        pop     af
3bfc  dd6e06    ld      l,(ix+#06)
3bff  cdb17d    call    #7db1
3c02  c35779    jp      #7957
3c05  213bf3    ld      hl,#f33b
3c08  e5        push    hl
3c09  3e00      ld      a,#00
3c0b  87        add     a,a
3c0c  9f        sbc     a,a
3c0d  3235f9    ld      (#f935),a
3c10  3236f9    ld      (#f936),a
3c13  3e00      ld      a,#00
3c15  3238f9    ld      (#f938),a
3c18  3e01      ld      a,#01
3c1a  3237f9    ld      (#f937),a
3c1d  2135f9    ld      hl,#f935
3c20  e5        push    hl
3c21  cdf7bd    call    #bdf7
3c24  f1        pop     af
3c25  18d5      jr      #3bfc           ; (-43)
3c27  213bf3    ld      hl,#f33b
3c2a  e5        push    hl
3c2b  1135f9    ld      de,#f935
3c2e  ff        rst     #38
3c2f  2135f9    ld      hl,#f935
3c32  e5        push    hl
3c33  cd03bb    call    #bb03
3c36  df        rst     #18
3c37  f1        pop     af
3c38  18c2      jr      #3bfc           ; (-62)
3c3a  213bf3    ld      hl,#f33b
3c3d  e5        push    hl
3c3e  210100    ld      hl,#0001
3c41  e5        push    hl
3c42  cdb2bc    call    #bcb2
3c45  f1        pop     af
3c46  c3fc7b    jp      #7bfc
3c49  213bf3    ld      hl,#f33b
3c4c  e5        push    hl
3c4d  210100    ld      hl,#0001
3c50  e5        push    hl
3c51  cd0fbd    call    #bd0f
3c54  f1        pop     af
3c55  c3fc7b    jp      #7bfc
3c58  3a27f1    ld      a,(#f127)
3c5b  6f        ld      l,a
3c5c  d7        rst     #10
3c5d  3a27f1    ld      a,(#f127)
3c60  dd77f8    ld      (ix-#08),a
3c63  97        sub     a
3c64  323ff3    ld      (#f33f),a
3c67  3240f3    ld      (#f340),a
3c6a  3241f3    ld      (#f341),a
3c6d  3242f3    ld      (#f342),a
3c70  c35779    jp      #7957
3c73  dd6ef8    ld      l,(ix-#08)
3c76  cdce7d    call    #7dce
3c79  dd6e06    ld      l,(ix+#06)
3c7c  cdb17d    call    #7db1
3c7f  dd6e0c    ld      l,(ix+#0c)
3c82  dd660d    ld      h,(ix+#0d)
3c85  e5        push    hl
3c86  dd6e0a    ld      l,(ix+#0a)
3c89  dd660b    ld      h,(ix+#0b)
3c8c  cd147e    call    #7e14
3c8f  79        ld      a,c
3c90  b7        or      a
3c91  ca5779    jp      z,#7957
3c94  2e5c      ld      l,#5c
3c96  cf        rst     #8
3c97  dd6e04    ld      l,(ix+#04)
3c9a  dd6605    ld      h,(ix+#05)
3c9d  e5        push    hl
3c9e  213bf3    ld      hl,#f33b
3ca1  e5        push    hl
3ca2  df        rst     #18
3ca3  f1        pop     af
3ca4  0e01      ld      c,#01
3ca6  3e0a      ld      a,#0a
3ca8  c39cbe    jp      #be9c
3cab  213ff3    ld      hl,#f33f
3cae  e5        push    hl
3caf  dde5      push    ix
3cb1  c1        pop     bc
3cb2  210600    ld      hl,#0006
3cb5  09        add     hl,bc
3cb6  4d        ld      c,l
3cb7  44        ld      b,h
3cb8  97        sub     a
3cb9  3235f9    ld      (#f935),a
3cbc  3236f9    ld      (#f936),a
3cbf  0a        ld      a,(bc)
3cc0  3237f9    ld      (#f937),a
3cc3  97        sub     a
3cc4  3238f9    ld      (#f938),a
3cc7  2135f9    ld      hl,#f935
3cca  e5        push    hl
3ccb  cd3ebd    call    #bd3e
3cce  f1        pop     af
3ccf  213ff3    ld      hl,#f33f
3cd2  e5        push    hl
3cd3  3a27f1    ld      a,(#f127)
3cd6  3237f9    ld      (#f937),a
3cd9  87        add     a,a
3cda  9f        sbc     a,a
3cdb  3238f9    ld      (#f938),a
3cde  3236f9    ld      (#f936),a
3ce1  3235f9    ld      (#f935),a
3ce4  2135f9    ld      hl,#f935
3ce7  e5        push    hl
3ce8  cd62ba    call    #ba62
3ceb  f1        pop     af
3cec  3a27f1    ld      a,(#f127)
3cef  6f        ld      l,a
3cf0  d7        rst     #10
3cf1  c35779    jp      #7957
3cf4  dd6ef8    ld      l,(ix-#08)
3cf7  cdce7d    call    #7dce
3cfa  cde6b8    call    #b8e6
3cfd  c35779    jp      #7957
3d00  dd6ef8    ld      l,(ix-#08)
3d03  cdce7d    call    #7dce
3d06  dd6e06    ld      l,(ix+#06)
3d09  cdb17d    call    #7db1
3d0c  cde6b8    call    #b8e6
3d0f  c35779    jp      #7957
3d12  213ff3    ld      hl,#f33f
3d15  e5        push    hl
3d16  3a27f1    ld      a,(#f127)
3d19  4f        ld      c,a
3d1a  87        add     a,a
3d1b  9f        sbc     a,a
3d1c  47        ld      b,a
3d1d  69        ld      l,c
3d1e  60        ld      h,b
3d1f  29        add     hl,hl
3d20  29        add     hl,hl
3d21  0160f1    ld      bc,#f160
3d24  09        add     hl,bc
3d25  e5        push    hl
3d26  df        rst     #18
3d27  f1        pop     af
3d28  dd6ef8    ld      l,(ix-#08)
3d2b  cdce7d    call    #7dce
3d2e  dd6e06    ld      l,(ix+#06)
3d31  cdb17d    call    #7db1
3d34  c35779    jp      #7957
3d37  3a27f1    ld      a,(#f127)
3d3a  6f        ld      l,a
3d3b  d7        rst     #10
3d3c  3a27f1    ld      a,(#f127)
3d3f  3241f3    ld      (#f341),a
3d42  87        add     a,a
3d43  9f        sbc     a,a
3d44  3242f3    ld      (#f342),a
3d47  3240f3    ld      (#f340),a
3d4a  323ff3    ld      (#f33f),a
3d4d  c35779    jp      #7957
3d50  e7        rst     #20
3d51  3a27f1    ld      a,(#f127)
3d54  ddbe04    cp      (ix+#04)
3d57  3005      jr      nc,#3d5e        ; (5)
3d59  0e01      ld      c,#01
3d5b  c384be    jp      #be84
3d5e  3a27f1    ld      a,(#f127)
3d61  fe10      cp      #10
3d63  f26b7d    jp      p,#7d6b
3d66  0e06      ld      c,#06
3d68  c384be    jp      #be84
3d6b  3a27f1    ld      a,(#f127)
3d6e  fe38      cp      #38
3d70  2005      jr      nz,#3d77        ; (5)
3d72  0e02      ld      c,#02
3d74  c384be    jp      #be84
3d77  3a27f1    ld      a,(#f127)
3d7a  fe1d      cp      #1d
3d7c  2005      jr      nz,#3d83        ; (5)
3d7e  0e05      ld      c,#05
3d80  c384be    jp      #be84
3d83  3a27f1    ld      a,(#f127)
3d86  fe30      cp      #30
3d88  2807      jr      z,#3d91         ; (7)
3d8a  3a27f1    ld      a,(#f127)
3d8d  fe31      cp      #31
3d8f  2005      jr      nz,#3d96        ; (5)
3d91  0e04      ld      c,#04
3d93  c384be    jp      #be84
3d96  3a27f1    ld      a,(#f127)
3d99  fe32      cp      #32
3d9b  faac7d    jp      m,#7dac
3d9e  2127f1    ld      hl,#f127
3da1  3e36      ld      a,#36
3da3  be        cp      (hl)
3da4  faac7d    jp      m,#7dac
3da7  0e03      ld      c,#03
3da9  c384be    jp      #be84
3dac  0e00      ld      c,#00
3dae  c384be    jp      #be84
3db1  e7        rst     #20
3db2  2e71      ld      l,#71
3db4  cf        rst     #8
3db5  2e59      ld      l,#59
3db7  cf        rst     #8
3db8  2e01      ld      l,#01
3dba  e5        push    hl
3dbb  dd6e04    ld      l,(ix+#04)
3dbe  e5        push    hl
3dbf  213bf3    ld      hl,#f33b
3dc2  cdc57f    call    #7fc5
3dc5  2e63      ld      l,#63
3dc7  d7        rst     #10
3dc8  2e72      ld      l,#72
3dca  cf        rst     #8
3dcb  c384be    jp      #be84
3dce  e7        rst     #20
3dcf  dd7e04    ld      a,(ix+#04)
3dd2  fe30      cp      #30
3dd4  200e      jr      nz,#3de4        ; (14)
3dd6  213bf3    ld      hl,#f33b
3dd9  e5        push    hl
3dda  213ff3    ld      hl,#f33f
3ddd  e5        push    hl
3dde  cd8dba    call    #ba8d
3de1  f1        pop     af
3de2  180c      jr      #3df0           ; (12)
3de4  213bf3    ld      hl,#f33b
3de7  e5        push    hl
3de8  213ff3    ld      hl,#f33f
3deb  e5        push    hl
3dec  cdd4bd    call    #bdd4
3def  f1        pop     af
3df0  c384be    jp      #be84
3df3  46        ld      b,(hl)
3df4  41        ld      b,c
3df5  54        ld      d,h
3df6  41        ld      b,c
3df7  4c        ld      c,h
3df8  2d        dec     l
3df9  4e        ld      c,(hl)
3dfa  55        ld      d,l
3dfb  4d        ld      c,l
3dfc  45        ld      b,l
3dfd  52        ld      d,d
3dfe  49        ld      c,c
3dff  43        ld      b,e
3e00  2056      jr      nz,#3e58        ; (86)
3e02  41        ld      b,c
3e03  4c        ld      c,h
3e04  55        ld      d,l
3e05  45        ld      b,l
3e06  204f      jr      nz,#3e57        ; (79)
3e08  55        ld      d,l
3e09  54        ld      d,h
3e0a  204f      jr      nz,#3e5b        ; (79)
3e0c  46        ld      b,(hl)
3e0d  2052      jr      nz,#3e61        ; (82)
3e0f  41        ld      b,c
3e10  4e        ld      c,(hl)
3e11  47        ld      b,a
3e12  45        ld      b,l
3e13  00        nop     
3e14  e7        rst     #20
3e15  213bf3    ld      hl,#f33b
3e18  e5        push    hl
3e19  dd6e04    ld      l,(ix+#04)
3e1c  dd6605    ld      h,(ix+#05)
3e1f  e5        push    hl
3e20  cdb0ba    call    #bab0
3e23  3815      jr      c,#3e3a         ; (21)
3e25  dd6e06    ld      l,(ix+#06)
3e28  dd6607    ld      h,(ix+#07)
3e2b  e5        push    hl
3e2c  213bf3    ld      hl,#f33b
3e2f  e5        push    hl
3e30  cdb0ba    call    #bab0
3e33  3805      jr      c,#3e3a         ; (5)
3e35  0e01      ld      c,#01
3e37  c38bbe    jp      #be8b
3e3a  3a40f1    ld      a,(#f140)
3e3d  fe01      cp      #01
3e3f  2005      jr      nz,#3e46        ; (5)
3e41  cd6f73    call    #736f
3e44  181a      jr      #3e60           ; (26)
3e46  3e01      ld      a,#01
3e48  3240f1    ld      (#f140),a
3e4b  2e58      ld      l,#58
3e4d  cf        rst     #8
3e4e  21f37d    ld      hl,#7df3
3e51  ef        rst     #28
3e52  cd6fa8    call    #a86f
3e55  3a26f1    ld      a,(#f126)
3e58  3269e9    ld      (#e969),a
3e5b  3e45      ld      a,#45
3e5d  3226f1    ld      (#f126),a
3e60  0e00      ld      c,#00
3e62  c38bbe    jp      #be8b
3e65  0a        ld      a,(bc)
3e66  58        ld      e,b
3e67  59        ld      e,c
3e68  5d        ld      e,l
3e69  5a        ld      e,d
3e6a  5b        ld      e,e
3e6b  5c        ld      e,h
3e6c  7b        ld      a,e
3e6d  71        ld      (hl),c
3e6e  72        ld      (hl),d
3e6f  75        ld      (hl),l
3e70  a6        and     (hl)
3e71  7e        ld      a,(hl)
3e72  14        inc     d
3e73  7f        ld      a,a
3e74  0d        dec     c
3e75  7f        ld      a,a
3e76  05        dec     b
3e77  7f        ld      a,a
3e78  fd7ef6    ld      a,(iy-#0a)
3e7b  7e        ld      a,(hl)
3e7c  ee7e      xor     #7e
3e7e  e47ecc    call    po,#cc7e
3e81  7e        ld      a,(hl)
3e82  ac        xor     h
3e83  7e        ld      a,(hl)
3e84  9f        sbc     a,a
3e85  7e        ld      a,(hl)
3e86  e7        rst     #20
3e87  21f9ff    ld      hl,#fff9
3e8a  39        add     hl,sp
3e8b  f9        ld      sp,hl
3e8c  3a40f1    ld      a,(#f140)
3e8f  fe03      cp      #03
3e91  2003      jr      nz,#3e96        ; (3)
3e93  c384be    jp      #be84
3e96  dd4e04    ld      c,(ix+#04)
3e99  21657e    ld      hl,#7e65
3e9c  c3edb8    jp      #b8ed
3e9f  97        sub     a
3ea0  3276f5    ld      (#f576),a
3ea3  3278f6    ld      (#f678),a
3ea6  cd7386    call    #8673
3ea9  c384be    jp      #be84
3eac  3a76f5    ld      a,(#f576)
3eaf  d601      sub     #01
3eb1  3276f5    ld      (#f576),a
3eb4  4f        ld      c,a
3eb5  97        sub     a
3eb6  47        ld      b,a
3eb7  69        ld      l,c
3eb8  60        ld      h,b
3eb9  0146f5    ld      bc,#f546
3ebc  09        add     hl,bc
3ebd  7e        ld      a,(hl)
3ebe  fe60      cp      #60
3ec0  20ea      jr      nz,#3eac        ; (-22)
3ec2  3a76f5    ld      a,(#f576)
3ec5  c601      add     a,#01
3ec7  3276f5    ld      (#f576),a
3eca  18da      jr      #3ea6           ; (-38)
3ecc  3a76f5    ld      a,(#f576)
3ecf  d601      sub     #01
3ed1  3276f5    ld      (#f576),a
3ed4  4f        ld      c,a
3ed5  97        sub     a
3ed6  47        ld      b,a
3ed7  69        ld      l,c
3ed8  60        ld      h,b
3ed9  0146f5    ld      bc,#f546
3edc  09        add     hl,bc
3edd  7e        ld      a,(hl)
3ede  fe68      cp      #68
3ee0  28c4      jr      z,#3ea6         ; (-60)
3ee2  18e8      jr      #3ecc           ; (-24)
3ee4  3a76f5    ld      a,(#f576)
3ee7  d601      sub     #01
3ee9  3276f5    ld      (#f576),a
3eec  18b8      jr      #3ea6           ; (-72)
3eee  3e01      ld      a,#01
3ef0  3278f6    ld      (#f678),a
3ef3  c3a67e    jp      #7ea6
3ef6  97        sub     a
3ef7  3278f6    ld      (#f678),a
3efa  c3a67e    jp      #7ea6
3efd  2ec7      ld      l,#c7
3eff  cd4cb5    call    #b54c
3f02  c3a67e    jp      #7ea6
3f05  3e01      ld      a,#01
3f07  3279f6    ld      (#f679),a
3f0a  c3a67e    jp      #7ea6
3f0d  97        sub     a
3f0e  3279f6    ld      (#f679),a
3f11  c3a67e    jp      #7ea6
3f14  cd7386    call    #8673
3f17  c3a67e    jp      #7ea6
3f1a  e7        rst     #20
3f1b  3a40f1    ld      a,(#f140)
3f1e  fe03      cp      #03
3f20  2003      jr      nz,#3f25        ; (3)
3f22  c384be    jp      #be84
3f25  cd7d81    call    #817d
3f28  79        ld      a,c
3f29  b7        or      a
3f2a  2834      jr      z,#3f60         ; (52)
3f2c  3a76f5    ld      a,(#f576)
3f2f  6f        ld      l,a
3f30  3a76f5    ld      a,(#f576)
3f33  c601      add     a,#01
3f35  3276f5    ld      (#f576),a
3f38  4d        ld      c,l
3f39  97        sub     a
3f3a  47        ld      b,a
3f3b  69        ld      l,c
3f3c  60        ld      h,b
3f3d  0146f5    ld      bc,#f546
3f40  09        add     hl,bc
3f41  e5        push    hl
3f42  3acbf0    ld      a,(#f0cb)
3f45  b7        or      a
3f46  280b      jr      z,#3f53         ; (11)
3f48  dd7e04    ld      a,(ix+#04)
3f4b  fe7d      cp      #7d
3f4d  2004      jr      nz,#3f53        ; (4)
3f4f  0e7f      ld      c,#7f
3f51  1803      jr      #3f56           ; (3)
3f53  dd4e04    ld      c,(ix+#04)
3f56  e1        pop     hl
3f57  71        ld      (hl),c
3f58  cd7386    call    #8673
3f5b  0e01      ld      c,#01
3f5d  c384be    jp      #be84
3f60  0e00      ld      c,#00
3f62  c384be    jp      #be84
3f65  e7        rst     #20
3f66  21f9ff    ld      hl,#fff9
3f69  39        add     hl,sp
3f6a  f9        ld      sp,hl
3f6b  3a40f1    ld      a,(#f140)
3f6e  fe03      cp      #03
3f70  2003      jr      nz,#3f75        ; (3)
3f72  c38bbe    jp      #be8b
3f75  dd7e04    ld      a,(ix+#04)
3f78  b7        or      a
3f79  f2827f    jp      p,#7f82
3f7c  3a76f5    ld      a,(#f576)
3f7f  4f        ld      c,a
3f80  1802      jr      #3f84           ; (2)
3f82  0e00      ld      c,#00
3f84  79        ld      a,c
3f85  dd8604    add     a,(ix+#04)
3f88  4f        ld      c,a
3f89  dd71f9    ld      (ix-#07),c
3f8c  dd7ef9    ld      a,(ix-#07)
3f8f  4f        ld      c,a
3f90  87        add     a,a
3f91  9f        sbc     a,a
3f92  47        ld      b,a
3f93  69        ld      l,c
3f94  60        ld      h,b
3f95  0146f5    ld      bc,#f546
3f98  09        add     hl,bc
3f99  7e        ld      a,(hl)
3f9a  ddbe06    cp      (ix+#06)
3f9d  2812      jr      z,#3fb1         ; (18)
3f9f  2146f5    ld      hl,#f546
3fa2  dd7ef9    ld      a,(ix-#07)
3fa5  5f        ld      e,a
3fa6  87        add     a,a
3fa7  9f        sbc     a,a
3fa8  57        ld      d,a
3fa9  19        add     hl,de
3faa  dd7e06    ld      a,(ix+#06)
3fad  77        ld      (hl),a
3fae  cd7386    call    #8673
3fb1  c38bbe    jp      #be8b
3fb4  f7        rst     #30
3fb5  3a76f5    ld      a,(#f576)
3fb8  4f        ld      c,a
3fb9  97        sub     a
3fba  47        ld      b,a
3fbb  69        ld      l,c
3fbc  60        ld      h,b
3fbd  0145f5    ld      bc,#f545
3fc0  09        add     hl,bc
3fc1  4e        ld      c,(hl)
3fc2  c372be    jp      #be72
3fc5  e7        rst     #20
3fc6  21f3ff    ld      hl,#fff3
3fc9  39        add     hl,sp
3fca  f9        ld      sp,hl
3fcb  3a40f1    ld      a,(#f140)
3fce  fe03      cp      #03
3fd0  2003      jr      nz,#3fd5        ; (3)
3fd2  c393be    jp      #be93
3fd5  dd6e06    ld      l,(ix+#06)
3fd8  e5        push    hl
3fd9  dd6e04    ld      l,(ix+#04)
3fdc  dd6605    ld      h,(ix+#05)
3fdf  cdf1a6    call    #a6f1
3fe2  dd71f4    ld      (ix-#0c),c
3fe5  dd70f5    ld      (ix-#0b),b
3fe8  3e20      ld      a,#20
3fea  ddbe08    cp      (ix+#08)
3fed  380d      jr      c,#3ffc         ; (13)
3fef  dd7e06    ld      a,(ix+#06)
3ff2  fe10      cp      #10
3ff4  2025      jr      nz,#401b        ; (37)
3ff6  dd36f308  ld      (ix-#0d),#08
3ffa  1830      jr      #402c           ; (48)
3ffc  dd7e08    ld      a,(ix+#08)
3fff  fe00      cp      #00
